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EXECUTIVE  SUMMARY 


This  report  describes  the  development  of  two  capability  assessment  models 
built  under  the  CAPLOG  project.  The  first  model  assesses  reparable  spare 
parts  availability  and  the  effect  on  aircraft  capability.  The  second  model 
evaluates  threat-oriented  munitions  availability  and  the  corresponding  effect 
on  Navy  capability.  These  models  are  designed  to  be  used  as  programming 
support  tools,  which  display  the  effect  of  funding  on  Navy  capability. 

The  aircraft  spares  capability  assessment  model  assesses  various  scenarios 
of  peace  and  wartime  (with  varying  lengths  of  time) ,  different  amounts  of 
flying  hour  requirements  for  specific  aircraft  (and  therefore  spare  parts) , 
and  examines  the  effect  that  various  budgets  have  on  the  resulting  capability. 
This  prototype  model  is  currently  operational.  It  is  being  used  for  the  F-14 
aircraft. 

The  munitions  model's  work  is  more  conceptual  and  focuses  on  air-to-air 
munitions.  Two  approaches  to  this  model  have  been  described  here.  The  first 
approach  is  an  applied  model  which  was  developed  in  order  to  obtain  answers 
quickly,  using  available  data  and  expert  judgement.  The  second  approach  is  an 
unconstrained  R&O  methodology  which  should  yield  more  accurate  results.  In 
this  example,  it  uses  the  F-14  and  F-4  aircraft,  and  the  Sparrow,  Phoenix,  and 
Sidewinder  missiles. 

Both  the  spares  and  munitions  assessment  models  were  developed  in  a 
fashion  which  would  allow  results  to  be  combined  in  a  balanced  resource 
format.  For  example,  the  same  scenario  and  force  structure  assumptions  were 
used  as  drivers  for  both  models.  The  balanced  results  can  then  be  portrayed 
as  an  "envelope  of  capability"  based  upon  resource  levels  of  two  different 


commodities. 


I .  INTRODUCTION 


Synergy  has  developed  two  capability  assessment  models  for  Navy  aircraft. 
One  assesses  spare  parts,  and  the  other,  munitions. 

Section  II  describes  the  background  on  this  approach.  It  includes  a 
description  of  why  such  capability  assessment  tools  are  required  and  how  they 
can  be  used. 

Section  III  presents  the  model  developed  to  assess  reparable  spare  parts 
availability  and  the  corresponding  effect  on  Navy  capability.  Tms  section 
contains  a  history  of  the  CAPLOG  spares  module  development  plus  sample  model 
reports  and  computer  source  code  for  the  model. 

Section  IV  describes  the  conceptual  framework  and  a  prototype  methodology 
for  a  munitions  availability  model  that  would  assess  the  resulting  impact  on 
capability.  This  section  presents  two  approaches.  One  is  designed  to  obtain 
quick  results  using  available  information.  The  other  is  more  analytical  and 
specifies  the  exact  information  needed  in  order  to  obtain  results. 

Section  V  presents  possibilities  for  future  work  on  these  models.  It 
describes  possible  extensions,  improvements,  and  further  applications  of  these 
two  capability  assessment  tools. 


II.  BACKGROUND 


This  final  report  describes  what  has  been  done  for  the  Navy  on  development 
of  two  logistics  capability  assessment  models.  The  first  model  assesses 
reparable  spares,  and  the  second,  air-to-air  munitions.  These  models  are 
designed  to  assess  the  effect  of  spare  parts  and  munitions  availability  on 
Navy  wartime  capabilities  under  a  variety  of  scenario  assumptions.  This 
provides  support  for  logistic s  budgeting  by  estimating  the  budget  for  spares 
and  munitions  required  to  accomplish  a  particular  set  of  plans,  and  the  efiect 
on  capability  if  funding  is  not  available.  Display  techniques  are  available 
to  support  analysis  and  funding  requests  for  spare  parts  and  munitions. 

For  the  past  ten  years,  the  U.S.  Air  Force  in  its  Logistics  Capability 
Measurement  System  (LCMS)  project  has  developed  striking  and  novel 
methodologies  for  relating  logistics  resources  to  materiel  readiness  in  both 
peace  and  war.  Some  of  the  analytical  work  done  under  that  erfort  led  to 
significant  refinements  in  resource  capability  assessment  techniques. 
Therefore,  it  is  appropriate  to  apply  any  knowledge  gained  in  Air  Force 
research  (when  applicable  to  Navy  problems)  to  produce  a  better  product  and  to 
avoid  duplication  of  efforts  across  the  services.  The  OSD/MRA&L  requires  the 
capability  to  assimilate  and  utilize  these  methodologies  in  developing  its  own 
long-term  logistics  budgeting  and  capability  plans  for  obtaining,  integrating, 
and  using  information  from  the  individual  military  services  for  logistics 
readiness  evaluation. 

The  Overview  Model,  a  part  of  the  LCMS,  was  originally  designed  to  provide 
tne  U.S.  Air  Force  with  tested  and  documented  logistics  readiness  models  that, 
on  a  quick-turnaround  basis,  illustrated  the  effects  of  various  budgetary  ana 
management  decisions  on  the  immediate  readiness,  mission  capability  and 


sustainability  of  the  United  States  Air  Force.  Over  the  past  several  years 
the  Overview  Model  has  undergone  rigorous  testing,  evaluation,  and 
improvement.  The  model  has  proved  itself  successful  in  assessing  the 
logistics  readiness,  mission  capability,  and  budget  requirements  of  the  Air 
Force.  The  Air  Force  work  that  is  of  particular  interest  is  that  portion 
which  has  developed  methods  of  making  wartime  projections  of  spares 
capabilities  by  individual  weapon  systems  under  different  assumptions  and 
scenarios,  while  this  has  been  done  in  detail  and  with  credibility,  the 
quick-response  aspects  of  this  system  are  critical  to  the  present  project.  In 
addition,  the  Air  Force  has  developed  methods  of  balancing  capabilities  of, 
and  requirements  for,  multiple  individual  logistics  programs  for  various  time 
periods  in  the  future. 

It  is  recognized  however,  that  the  Navy  is  not  the  Air  Force  and  many 
significant  differences  exist.  For  example,  the  Navy  has  different  missions, 
different  resupply  concepts,  and  different  data  systems,  to  name  a  few. 

The  first  step  in  adapting  these  methodologies  for  Navy  use  is  to  develop 
working  hypotheses  about  the  relationships  between  its  materiel  readiness  for 
reparable  spares  to  capabilities  for  individual  aviation  weapon  systems  for 
the  Navy.  Specific  examples  were  developed  for  individual  aircraft  weapon 
systems  using  the  modified  LCMS  Overview  Model  and  using  data  as  provided  by 
Navy  Personnel. 

In  addition,  emphasis  on  specific  needs  of  the  Navy  that  differ  from  those 
of  the  Air  Force  should  be  given  prominence.  The  intent  of  this  project  was 
to  demonstrate  to  the  Navy  that  these  methods  are  technically  feasible  and 
that  the  Navy  should  adopt  the  models  developed  under  this  project  for  their 
own  use.  Specifically,  developing  acceptable  scenarios  for  carrier-based 


activities  was  given  special  attention.  Problems  of  developing  Navy-wide 
capability  estimates  by  individual  carrier  groups,  have  been  isolated  and 
addressed  with  the  development  of  feasible  computation  methodologies. 

Synergy  has  developed  a  working  computer  model  prototype  of  a  chart 
relating  Navy-wide  sorties  assigned  under  either  Navy-provided  scenario  data 
or  under  both  high  and  low-boundary  scenarios  to  individual  weapon  system 
reparable  spares  capabilities  for  the  F-14  weapon  system  used  by  the  Navy. 

This  model  was  adapted  from  the  LCMS  Overview  Model  used  by  the  Air  Force. 

The  second  part  of  this  effort  was  the  development  of  a  prototype  model 
for  air-to-air  munitions. 

Munitions  sustainability  and  the  depiction  of  alternatives  for  POM  support 
has  long  been  a  problem  area  for  the  services.  Heretofore,  sustainability 
questions  from  OSD  to  the  services  have  been  answered,  of  necessity,  with 
gross  tonnages  and  dollars.  While  this  kind  of  approach  has  been  acceptable 
in  the  past,  the  information  requirements  for  more  sophisticated  analyses  and 
outputs  in  the  area  of  munitions  are  increasing. 

Synergy  developed  a  working  computer  model  prototype  which  relates 
requirements,  time-phased  for  each  individual  munition  to  current  and 
projected  inventories  on  an  individual  munition-type  basis.  The  model  is 
sensitive  to  changes  in  key  variables  such  as  expenditure  per  sortie  factors 
( EPSF) ,  weapon  loads,  role  effect  factors,  and  shifts  in  scenarios.  In 
addition,  the  model  is  capable  of  handling  substitution  of  less  preferred 
munitions  for  preferred  munitions  when  they  are  exhausted. 

The  spares  model  that  was  developed  is  currently  in  use.  The 
munitions  model  is  still  a  manual  prototype.  A  detailed  description  of  each 
is  contained  in  the  following  sections. 


III.  CAPLOG  SPARES  MODEL 


A.  Introduction 

During  the  first  six  months  of  this  contract.  Synergy,  Inc.  has  adopted 
U.s.  Air  Force  logistics  capability  assessment  methodologies  for  use  by  the 
U.s.  Navy.  Initially,  this  work  has  focused  upon  projections  of  wartime 
spares  capabilities  for  individual  weapon  systems  under  different  assumptions 
and  scenarios  to  analyze  the  capability  and  sustainability  of  the  U.S.  Navy. 

Our  work  in  this  area  has  led  to  the  development  of  a  Navy  aviation  spares 
capability  assessment  model  and  management  information  system  known  as  the 
CAPLOG  system.  The  CAP LOG  system  is  designed  to  assess,  on  a  quick-response 
basis,  the  effects  of  various  budgetary  and  management  decisions  on  the 
immediate  readiness,  mission  capability  and  sustainability  of  the  U.S.  Navy. 

The  CAPLOG  system  by  design  consists  of  four  modules  which,  when  used 
together,  will  give  a  complete  picture  of  the  current  logistic  readiness  and 
budgetary  needs  of  the  Navy's  aviation  reparable  spares  programs.  The  system 
is  designed  in  a  modular  fashion  and  our  prototype  development  has  proceeded 
in  a  modular  fashion.  The  Navy  and  Synergy  jointly  decided  to  start  the 
building  of  the  CAPLOG  system  with  the  development  of  the  Mission  Degradation 
Module. 

Mission  Degradation  was  chosen  for  the  initial  prototype  development 
because  it  will  provide  the  capability  the  Navy  needs  first;  i.e.,  the 
assessment  of  mission  capability  and  sustainability  by  weapon  system.  This 
report  presents  interim  results  of  this  prototype  development. 

This  section  begins  with  a  description  of  the  CAPLOG  system.  This  is 
followed  by  a  description  of  the  data  base,  including  problems  encountered, 
and  how  the  data  base  was  expanded,  and  the  flying  hour  inputs.  Next  is  a 
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brief  description  of  the  model  conversion,  process,  procedures  for  accessing 
the  system,  and  a  SOURCE  Listing.  The  last  pieces  in  this  section  are  a 


description  of  output  reports,  model  results,  and  a  description  of  model  runs 
using  the  new  data  base,  including  a  briefing  on  these  results. 

II 

» 

* 

* 

« 

% 
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B.  Description  of  the  CAPLOG  System 

The  CAPLOG  system  was  designed  to  ultimately  include  four  different 
modules  which,  when  used  together,  would  portray  the  current  logistics 
readiness  and  budgeting  needs  of  Navy  aviation  reparable  spares  programs. 

These  modules  are: 

1 .  The  Mission  Degradation  module  provides  an  analysis  of  mission 
capability  and  sustainability  by  weapon  system  and  indicates  specific  spares 
that  cause  mission  failure  or  degradation.  The  module  calculates  on  a 
day-by-day  basis  the  percentage  of  required  missions  flown  based  on 
availability  of  spare  parts. 

2.  The  Shortfall/Buy  module  assesses  mission  sustainability  as  it  relates 
to  aviation  logistics  budgets  and  spares  management  decisions.  The  module 
determines  the  total  reparable  spares  budget  required  to  support  a  given 
flying  hour  program  for  both  peace  and  war. 

3.  The  Pipeline  Fill  module  calculates  for  each  day  of  a  war  the  dollar 
value  of  all  reparable  spares  that  have  failed  and  are  in  some  phase  of  the 
repair  process.  The  module  calculates  the  dollar  value  of  the  inventory 
necessary  to  compensate  for  spare  parts  in  the  repair  pipeline  due  to  a 
specified  fluctuating  wartime  flying  hour  program. 

4.  The  Readiness  Module  measures  the  state  of  logistics  readiness  as  a 
function  of  spare-part  availability.  The  module  determines  the  number  of 
times  during  the  war  that  specific  spares  cause  a  NMCS  aircraft  to  occur  and 
lists  those  NSNs  which  are  in  a  short  or  a  long  supply  position. 

All  four  modules  will  use  data  from  the  same  sources.  The  mathematical 
methods  employed  in  each  of  the  modules  are  consistent  with  each  other  so  that 
a  complete  picture  of  Navy  logistics  *:adiness  and  budgets  can  be  obtained. 
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The  development  of  the  CAP LOG  system  is  proceeding  m  a  modular  fashion. 
Therefore,  initial  development  as  described  in  this  document  focuses  on  the 
Mission  Degradation  Module  and  the  data  base  whict-  supports  it  and  the  other 
modules.  The  Mission  Degradation  Module  provides  the  capability  that  the  Navy 
requires  first,  which  is  the  assessment  of  mission  capability  and 
sustainability  by  weapon  system.  The  data  base  development  is  critical  and 
represents  a  large  part  of  the  effort  since  the  data  must  be  extracted  from  a 
number  of  Navy  data  systems. 


C.  The  Mission  Degradation  Module 

The  purpose  of  the  Mission  Degradation  Module  is  to  evaluate  the 
relationship  between  reparable  spare  inventory  investments  and  Navy  mission 
capabilities.  It  calculates  the  time  to  exhaustion  of  all  spare  parts  (NSNs) 
for  selected  aircraft.  It  calculates  the  number  of  aircraft  available  for 
mission  assignments  and  the  number  of  assembled  aircraft  as  a  function  of 
reparable  spare  inventories  and  repair  cycle  times. 

For  each  spare,  demands,  condemnations  and  repairs  are  calculated.  The 
repaired  parts  are  added  back  into  the  ready- for-issue  category.  When  an 
aircraft  requires  a  ready-for-issue  spare  and  one  is  not  available  (the 
inventory  has  been  exhausted),  the  first  source  of  spares,  as  described  below, 
is  from  cannibalization.  The  program  currently  uses  the  default  assumption 
that  the  TMSs  specified  are  served  in  an  established  priority  order.  The 
program,  thus,  runs  every  TMS  every  day  from  a  pool  of  both  common  and  unique 
spares  assumed  to  be  available  to  all  aircraft  on  an  as-needed  basis,  but  in 
TMS  priority  order.  (This  logic  feature  is  not  relevant  in  the  initial 
prototype  because  only  one  TMS,  the  F-14A,  is  being  used. 

While  the  model  is  running,  a  continuous  inventory  account  is  maintained 
for  each  spare  part.  Those  spares  that  fail  on  a  given  day  are  withdrawn  from 
the  running  inventory  and  those  that  are  repaired  and  returned  to  a 
serviceable  state  are  added  to  inventory  by  day. 

The  sequential  logic  used  by  the  Mission  Degradation  Module  is  as  follows: 

First,  for  the  selected  aircraft  used  in  the  simulation,  the  peace  and  war 
flying  hour  programs  and  the  sensitivity  parameters  are  defined.  As  the  model 
starts  the  simulation,  processing  each  spare  part,  it  establishes  several 


initial  conditions  or  assumptions: 


(1)  The  Navy  can  perform  its  mission  with  some  aircraft  in  a 
non-operative  status,  which  are  then  cannibalized  to  provide  spare 
parts  to  essential  aircraft.  The  default  assumption  of  this  model 
is  to  assume  that  when  a  ready-for-issue  spare  part  is  needed  and 
is  not  available,  an  aircraft  is  immediately,  completely,  and 
costlessly  cannibalized.  Thus,  every  assembled  aircraft  is 
thought  of  as  consisting  of  a  large  number  of  assembled  spare 
parts.  The  "quantity  per  aircraft"  (yPA)  and  the  "application 
percentage"  are  used  to  accomplish  this  result. 

(2)  At  present  status,  the  module  considers  365  peace  days  and  up  to  a 
120-day  war. 

(3)  Aircraft  attrition  and  down-time  are  determined  by  aircraft  type, 
but  not  as  a  function  of  time.  Attrition  is  subtracted  from  all 
assembled  aircraft.  To  meet  its  mission  requirement,  the  module 
tries  to  use  all  of  these  assembled  aircraft  while  minimizing  the 
average  missions  per  aircraft  per  day. 

(4)  The  number  of  missions  per  TMS  based  on  "flying  hours  per  day"  and 
"hours  per  mission"  cannot  be  greater  than  the  upper  limit  based 
on  the  ratio  of  a  24-hour  day  (less  down-time)  to  "hours  per 
mission."  In  other  words,  an  upper  limit  of  the  maximum  number  of 
missions/day  per  aircraft  is  imposed;  flyable  aircraft  try  to  meet 
the  flying  program  by  increasing  the  number  of  missions  per 
aircraft  per  day  up  to  the  established  maximum. 

Serviceable  Total  Assets  for  peace  and  wartime  are  defined  as  on-the-sheif 
and  ready-for-issue  items.  Unserviceable  assets  are  distributed  uniformly 
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across  the  repair  pipeline  and  On-Order  Assets  are  distributed  uniformly 
across  the  procurement  pipeline.  This  creates  the  Initial  Inventory. 

The  total  number  of  parts  per  NSN  that  are  installed  in  each  TMS 
(QPA-- quantity  per  application)  is  multiplied  by  the  number  of  aircraft  in 
that  TMS  in  the  force  mix.  This  represents  the  “Total  Number  of  Parts 
Installed"  in  the  assembled  aircraft.  The  "Initial  Inventory"  is  then  added 
to  the  "Total  Number  of  Parts  Installed"  to  establish  the  initial  "Parts  on 
Hand"  for  wartime  simulation.  Added  to  "Parts  on  Hand"  are  the  daily 
additions  of  "Base  and  Depot  Returns"  creating  the  "Total  Parts"  available  for 
assembling  aircraft.  This  is  done  for  each  day  of  the  simulated  war. 

Before  processing  all  the  TMSs,  "Available  Aircraft”  is  initialized  by 
dividing  "Total  Parts"  by  the  QPA  (number  of  spares)  associated  with  that  TMS. 
Note  that  the  Quantitites  per  Application  (QPA)  for  each  NSN  can  be  unique  or 
common.  When  common  are  used  by  more  than  one  aircraft,  the  QPA  order  is  the 
same  as  in  the  TMS's  cross-reference  dictionary.  The  QPA  for  any  TMS  is 
between  one  and  ninety-nine. 

Therefore,  for  each  NSN  record  processed,  all  TMSs  are  checked  to  see  if 
they  use  or  need  the  part  during  the  war.  If  "Available  Aircraft"  is  greater 
than  "Assembled  Aircraft"  (assembled  aircraft  minus  attrition) ,  it  is  set 
equal  to  "Assembled  Aircraft”;  if  negative,  it  is  set  to  zero.  Eventually 
"Total  Parts"  becomes  the  number  of  aircraft  remaining  from  those  which  were 
in  the  inventory  on  D-day  after  subtracting  those  lost  by  attrition  or 
inoperable  because  of  a  needed  part  or  parts. 

As  the  number  of  "Available  Aircraft"  is  defined  according  to  remaining 
available  parts,  also  calculated  are  "Aircraft  Lost  by  Attrition"  and 
"Missions  Flown  per  Aircraft."  In  other  words,  when  one  spare  fails  and  there 


are  no  serviceable  assets  in  the  inventory  for  it,  that  aircraft  is  then 
cannibalized  and  the  remaining  flyable  aircraft  have  to  try  to  perform  all  of 
the  missions  without  it.  However,  all  of  the  spares  on  that  cannibalized 
aircraft  are  assumed  to  be  available  in  serviceable  inventory  for  remaining 
flyable  aircraft. 

The  force  is  assumed  to  complete  100  percent  of  its  missions  for  as  long 
as  possible.  As  soon  as  the  number  of  flyable  aircraft  (each  operating  at  the 
maximum  number  of  sorties  per  day)  cannot  meet  all  assigned  missions,  mission 
degradation  begins  to  occur.  As  additional  flyable  aircraft  are  short  of 
essential  spares  which  are  not  available  and  have  to  be  cannibalized,  the 
percentage  of  missions  tends  to  decline.  On  the  other  hand,  when  serviceable 
spares  begin  to  return  from  bases  and  depots,  NMCS,  or  cannibalized  aircraft 
are  assumed  to  be  repaired  or  reassembled. 

Finally,  at  the  end  of  the  wartime  simulation,  the  following  are 
calculated: 

(1)  "Cannibalized  Aircraft"  by  subtracting  "Available  Aircraft"  from 
"Assembled  Aircraft. " 

(2)  "Missions  per  Aircraft"  by  dividing  the  number  of  "Aircraft 
Missions  Required"  (from  Flying  Program)  by  "Available  Aircraft." 

(3)  "Percent  Missions  Flown"  the  ratio  of  "Missions  Flown"  (mission  by 
"Available  Aircraft")  to  the  number  of  "Aircraft  Missions 
Required . " 

For  each  year's  simulation,  the  percent  degradation  of  missions  (missions  not 
flown)  caused  by  inadequate  inventory  of  reparable  spare  parts  at  the 
commencement  of  a  war  is  determined. 


0.  The  CAP  LOG  Data  Base 

I  ' 

This  section  presents  a  report  on  the  development  of  the  CAPLOG  data  base. 
Quantitative  models  such  as  Mission  Degradation  are  sensitive  to  the  quality 
of  data.  The  best  available  sources  of  Navy  aviation  data  have  been 
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identified  to  insure  that  the  results  of  the  Mission  Degradation  Module  are  a8 
realistic  and  accurate  as  possible. 

The  CAPLOG  system  requires  specific  detailed  information  on  each  reparable 

i 

spare  contained  in  the  data  base.  This  detailed  information  on  each  item  is 
needed  to  support  the  basic  capabilities  and  requirements  assessment 
algorithms.  Immediately  following  is  a  description  of  the  CAPLOG 
item-specific  data  base. 


TH£  ITEM-SPECIFIC  DATA  BASE 


Variable  # 

Variable  Name 

Units 

Definition 

1 

National  Stock 
Number 

National  Stock  Number 

2 

Unit  Price 

Dollars 

The  unit  price  of  an  item 

3 

Administrative 

Lead  Time 

Months 

The  administrative  lead  time 
is  the  time  between  preparing 
a  contract/purchase  order  and 
the  date  of  its  award  or  order 

initiation. 

4 


5 


Production  Lead  Months 
Time 


Days 


The  period  in  time  between 
planning  an  order  or  letting  a 
contract  and  the  date  of 
receipt  of  the  first 
production 

Total  number  of  calendar  days 
that  elapse  between  the 
initiation  of  a  request  for  a 
serviceable  item  from  the  base 
and  its  receipt 


Base  Order  and 
Ship  Time 


r 

L 


a 
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Variable  # 

Variable  Name 

Units 

Definition 

6 

Demand 

Failures/ 

Million 

Flying 

Hours 

The  number  of  failures  at 
bases  for  replacement  of 
removed  unserviceable  spare 
parts  per  million  flying  hours 

> 

7 

BCM  % 

Percent 

The  percentage  of  base 
failures  that  must  return  for 
processing  at  the  depot 

■> 

8 

Base  Repair 

Cycle  Days 

Days 

Total  number  of  calendar  days 
between  the  time  an 
unserviceable  item  is  removed 
from  use  and  the  time  it  is 
made  serviceable  in  base 
maintenance  and  ready  for  use 

9 

Depot  Repair 
Cycle  Days 

Days 

Total  number  of  repair  days 
between  the  time  an 
unserviceable  item  is  removed 
from  use  and  the  time  it  is 
made  serviceable  from  depot 
maintenance  and  ready  for  use 

> 

10 

BCMs  Condemned 

Percent 

The  portion  of  base-processed 
units  that  were  beyond 
economical  repair,  therefore 
condemned 

*> 

1  1 

Depot 

Condemnation 

Percent 

Percent 

The  portion  of  depot  processed 
units  that  were  beyond 
economical  repair,  therefore 
condemned 

12 

Item 

Essentiality 

Code 

1-5 

A  numeric  code  assigned  to  an 
individual  item  indicating  its 
relative  impact,  on  mission 
capability  in  the  event  of  a 
stockout.  The  code  is  a 
ranking  factor  numbered  one 
(least  impact)  through  five 
(greatest  impact) 

13 

Unit  Repair 

Cost 

Dollars 

Repair  cost  of  a  spare  part 

On-order  Assets 


Number  of 
Items 


The  model  is  programmed  to 
accept  nineteen  categories  of 
on-order  assets. 


Variable  #  Variable  Name 


Units 


Definition 


15 


Total  Assets 


Number  of  The  model  is  programmed  to 
Items  accept  a  total  of  fifteen 

categories  of  total  assets 
which  include  serviceable  plus 
unserviceable  and  on-order 
assets 


16  QPA 


Number  of  Quantity  Per  Application 
Items 


17 


Application 

Percent 


Percent  The  percent  of  a  particular 

TMS  that  has  this  particular 
part  on  it 


Three  major  organization  sources  of  Navy  Aviation  data  have  been 
identified:  the  Master  Data  File  from  the  Navy  Aviation  Supply  Office  (ASO) , 

the  3M  data  base  from  the  Navy  Aviation  Maintenance  Support  Office  ( NAMSO ) , 
and  the  Master  Component  Rework  Control  System  (MCRC)  data  base  from  NALC. 
Immediately  following  is  a  brief  description  of  the  different  sources  of  data. 

1 .  ASO  Data 

The  ASO  data  are  stored  in  an  integrated  multiple  file  complex.  The  ASO 
files  of  interest  to  this  project  include  the  Master  Data  File  (MDF)  which 
contains  a  large  number  of  variables  by  stock  number  plus  the  Weapon  System 
File  ( WSF)  which  contains  a  "top-down"  breakdown  of  each  air era ft/ weapon 
system/ equipment  in  the  ASO  inventory.  It  provides  the  capability  to  identify 
each  part  component,  system,  or  subsystem  to  its  higher  or  next  lower 
application(s) .  The  WSF  is  structured  into  levels  which  provide  the 
capability  to  identify  each  item  used  on  each  aircraft  common  to  different 
aircraft  and,  conversely,  the  various  aircraft  utilizing  a  particular  item. 


15 


The  F-14  weapon  system  data  were  sent  from  ASO  on  three  magnetic  tapes 
including  one  for  the  MDF  and  two  for  the  WSF.  The  HOF  tape  (E48RT1)  contains 
approximately  80  data  elements  on  six  record  types  for  each  of  the 
approximately  4,000  items  in  the  file.  Exhibit  1  is  a  list  of  the  data 
elements  that  are  available  of  E48RT1 . 

The  WSF  tapes  (E48BU2  and  E48BU2A)  contain  three  types  of  records  and 
approximately  seven  unique  variables.  Exhibit  2  is  the  record  layout  for  the 
MDF  and  Exhibit  3  is  the  WSF  record  layout.  Each  data  element  has  been 
assigned  a  specific  location  on  a  specific  record.  Each  record  can  contain  up 
to  130  characters. 
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EXHIBIT  2  (Cont'd) 


EXHIBIT  2  (Cont'd) 


fACF*  0T  fcNCLOSUMt:  (5) 


a 

a 
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2.  NAMSO  Data 

NAMSO's  3M  data  system  will  be  the  source  tor  the  retail-level  item  data. 
The  3M  system  contains  two  basic  kinds  of  data  necessary  for  the  CAPLOG 
prototype.  First,  3M  represents  a  basic  source  for  retail  level  failure 
rates.  These  data  are  reliability  and  maintainability  observations  by  work 
unit  code  and  major  command.  These  are  in  the  form  of  flying  hour  and  failure 
observations  which  can  be  translated  into  demand  rates  by  work  unit  code. 

Ideally,  it  is  preferable  to  have  the  demand  rates  by  stock  number. 
However,  the  Navy  appears  to  keep  failure  data  only  on  a  work  unit  code  basis. 
Usually,  there  will  be  several  stock  numbers  included  in  any  one  work  unit 
code.  Therefore,  to  achieve  a  stock  number  level  of  detail,  another  piece  of 
information  from  NAMSO  will  be  used— the  work  unit  code/part  number/NUN 
cross-reference.  The  implicit  assumption  is  that  any  stock  number  within  a 
work  unit  code  experiences  the  same  failure  rate  as  the  work  unit  code. 

In  addition  to  failure  rates  and  a  cross-reference  dictionary,  the  NAMSO 
data  include  several  item-level  observations.  On  a  stock  number  basis, 
turnaround  times  (repair  cycle  times)  at  the  retail  level,  the  returns  to 
depot  for  repair,  and  the  condemnations  at  the  retail  level  are  available. 

The  failure  data  are  contained  on  tape  MAXH94/DD1 .  The  record  layout  for 
this  tape  is  shown  in  Exhibit  4.  The  record  layout  of  tape  MAX93/CC1 ,  the 
item-level  data,  is  shown  in  Exhibit  5. 
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3.  NALC  Data 


The  Navy  Air  Logistics  Center  coiiects  data  on  repair  activities  at  the 
depot  Level.  Most  of  the  data  reside  in  the  Master  Component  Rework  Control 
(MCRC)  data  base.  Two  variables  were  extracted  from  this  data  base — Average 
Depot  Turnaround  Time  and  Average  Cost  of  Repair.  These  variables  are  by 
stock  number. 

4.  Data  Sources 

This  section  documents  the  actual  methodology  used  to  construct  the 
item-specific  data  elements  using  the  various  sources  of  Navy  data.  Exhibit  6 
is  a  detailed  list  providing  specific  information  on  what  the  variable  name 
is,  what  file  this  variable  came  from,  its  record  location  and,  where 
necessary,  how  it  was  constructed. 

5.  Data  Problems 

There  are  several  data  problems  which  deserve  mention.  These  problems 
fall  into  two  general  classes:  manipulation  of  existing  data  to  create  a 
master  data  base  and  data  which  are  needed,  but  which  are  not  currently 
available . 

First,  several  existing  data  elements  were  transformed  to  conform  to  the 
logic  of  the  CAJPLOG  model.  Minor  examples  include  the  merging  of  several  data 
elements  to  develop  a  national  stock  number  and  the  subtraction  of  production 
lead  time  from  procurement  lead  time  to  develop  administrative  lead  time.  A 
major  data  manipulation  involves  the  adjustment  of  item  Quantity  Per 
Application  (QPA)  and  Application  Percentages  (AP)  from  the  ASO  Master  Data 
File. 

The  model  logic  requires  that  all  stock  number  QPAs  and  APs  be  at  the 
weapon  system  level.  That  is,  the  model  needs  to  know  the  total  number  of 


ft 
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EXHIBIT  6 
DATA  ELEMENTS 


Var.Naae 

Start 

Position 

Length 

File  Name 

Record 

Notes 

Uhit  Price* 

60 

60-68 

E48RT1 (ASO) 

1 

Contract* 
Production 
Lead  Time 
Average 

84 

84-86 

E48RT1 (ASO) 

3 

Used  to 
construct  the 
administrative 
lead  time 

• 

Contract 
Procurement* 
Lead  time 
Forecast 

87 

87-90 

E48RT1 (ASO) 

3 

• 

*  The  Administrative  Lead  Time  is  constructed  by  attracting  the  contract 

Production  Lead  Time  average  from  the  contract  Procurement  Lead  Time  forecast. 

Both  of  these  variables  are  expressed . 

* 

Var.Name 

Position 

Length 

File  Name 

T2P«  , 

Notes 

9 

Repair  Coat 

49 

49-57 

E48RT1 (ASO) 

2 

Used  as  a  proxie 
for  the  repair 
cost  from  MCRC 

Depot 

Condemation 

Percent 

65 

65-67 

E48RT1 (ASO) 

3 

This  variable  is 
known  to  ASO  as 
the  Wearout  Rate 

9 

QFA 

44 

44-48 

E48RT1 (ASO) 

6 

Percent  per 
Application 

49 

49-51 

E48RT1 (ASO) 

6 

• 

t 

Progressive  64 

Rework 

Turnaround 

Time  (East  Coast) 

64-66 

E48RT1 (ASO) 

6 

Used  to  construct 
depot  repair  time* 

* 

*  The  depot  repair  time  is  constructed  frcm  the  average  of  the  Rework 

Turnaround  Time  (East  Coast)  and  the  Rework  Turnaround  Time  (West  Coast). 
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EXHIBIT  6  (Cont'd) 


Var. Haste 

Position 

Type 

Notes 

Total 

Elicit 

Hours 

79 

79-85 

MAXH94/DD1 

(NAMSO) 

NA 

Used  to 
construct  the 
demand  rate 

Total 

Failure 

93 

93-99 

MAXH94/DD1 

(NAMSO) 

HA 

Used  to 
construct  the 
demand  rate 

Var. Name 

Position 

File  Name 

IIE£_ 

Notes 

Base  Repair 
Time 

111 

111-111 

MAXH93/CC1 

NA 

Action 

Taken 

Code  1  CATO 

125 

125-129 

MAXH93/CC1 

NA 

Var .Name 

Position  Length 

File  Name 

Tg»e... 

Notes 

ATC4 

137  137-141 

MAXH93/cc1 

NA 

Used  to 

construct 

ATC 2 -3-5- 8 

156  156-160 

MAXH93/cc1 

NA 

the  NRTS 

rate* 

Total  Items 

i  61  61-65 

MAXH93/CC1 

NA 

*  The  base 

not  reparable.  This  station  (base 

NRTS  %)  is  contracted  by 

taking  the 

sum  of  the  action  taken 

codes  1,  2, 

3,  4,  5, 

8  and  dividing 

that  sum  by  total  number  of  items 

to  get  a  percent. 

Var. Naan 

Position 

File  Name 

IIP? _ 

Notes 

ATC  9 

161 

161-165 

MAXH93/CC1 

Used  1 

construct  Bass 

Condemnation 

Percent 


*  Base  Condemnation  percent  is  constructed  by  dividing  ATC  9  by  the  total 
number  of  itmns  to  get  the  percent  of  base  condemnations. 
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each  item  on  the  weapon  system.  The  information  from  ASO,  however,  is  the  yPA 
and  AP  for  an  item  on  its  next  higher  assembly.  If  the  item  fits  on  another 
item  before  it  fits  on  the  aircraft,  it  is  a  lower-level  item  ana  the  yPA 
could  be  underestimated  and,  therefore,  demands  underestimated. 

This  requires  that  application  codes  be  extracted,  levels  of  items  be 
identified  and  their  relationship  to  other  items  and  to  the  weapon  system 
defined.  Then  all  yPAs  and  APs  must  be  adjusted  to  the  weapon  system  level. 

The  second  major  class  of  problems  involves  missing  variables.  There  are 
problems  with  essentiality  of  items,  total  worldwide  inventory  of  assets,  and 
base  order  and  ship  times.  Methods  of  working  around  each  of  these  problems 
are  discussed  below. 

The  CAPLOG  model  allows  for  an  essentiality  code  to  be  specified  for  each 
spare.  This  coding  relates  to  mission  essentiality  and  the  model  can  be  run 
on  different  classes  of  essentiality.  The  Navy  does  not  currently  have  such  a 
coding  scheme;  however,  they  are  in  the  process  of  developing  it. 

Space  has  been  left  for  this  code  in  the  data  base  and,  when  it  becomes 
available,  it  can  be  utilized.  In  the  interim,  the  model  is  run  under  the 
implicit  assumption  that  all  parts  are  equally  essential.  This  will  have  the 
effect  of  underestimating  true  capability.  This  will  be  stated  explicitly  as 
a  caveat  to  be  considered  in  evaluating  the  results  of  the  model. 

The  worldwide  inventory  problem  requires  a  quite  different  approach. 
Worldwide  inventory  on  a  stock-number  basis  is  available  at  the  wholesale 
level.  The  problem  is  that  these  numbers  will  not  include  assets  which  are  on 
the  carriers.  Therefore,  some  potential  inventory  numbers  need  to  be  created 
which  help  to  bound  the  capability  results. 

Some  estimates  of  total  worldwide  inventory  have  been  created  by  working 
with  the  ASO  data,  carrier  allowance  lists,  and  some  assumptions  regarding  the 
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average  fill  rate  on  all  carriers.  The  sum  of  products  generated  from  the 

« 

number  In  F-14  allowance  list  times  the  fill  rate  for  each  carrier  will  be 
added  to  the  ASO  inventory  position  for  each  stock  number.  This  will  provide 
a  rough  estimate  of  the  inventory  but  will  establish  a  boundary  on  the  answer. 

I 

The  Navy  apparently  does  not  collect  data  on  average  order  and  ship  times 
for  spare  parts  which  are  sent  between  carrier  and  depot.  This  is  an 
important  variable  because  it  affects  the  quantity  of  a  spare  required  to  fill 

fl 

a  pipeline  and  therefore  the  amount  necessary  to  maintain  a  given  capability. 

In  addition,  the  Navy  situation  is  more  complex  than  the  Air  Force 
situation  with  respect  to  this  variable.  The  Air  Force  can  be  treated  as  one 
large  base  and  one  large  depot  with  average  order  and  ship  times  between  the  * 

two.  The  Navy  cannot  be  treated  so  simply,  due  to  the  mooility  of  its 

carriers. 

The  Navy  has  a  maximum  of  thirteen  carriers  which  move  around  the  world  to  * 

satisfy  different  perceived  threats.  Logistics  lines  in  the  Mediterranean 
will  be  shorter  than  logistics  lines  in  the  Pacific  Ocean.  Also,  highly 

critical  parts  may  be  shipped  by  air,  others  may  be  shipped  by  surface  ship.  -® 

This  will  be  handled  by  setting  up  average  order  and  ship  time  based  upon 
scenario  and  therefore  deployment  location.  The  more  remote  the  theater  of 

engagement,  the  longer  will  be  the  average  order  and  ship  time.  * 

Another  way  to  handle  this  problem  is  to  develop  an  average  order  and  ship 
time  for  all  carriers  across  all  deployment  locations  and  install  this  in  the 

data  base  as  an  initial  average.  The  model  has  the  capability  of  increasing  * 

or  decreasing  a  variable  on  a  percentage  basis  for  all  parts.  Therefore,  this 
percentage  could  be  used  to  increase  or  decrease  the  gross  average  order  and 

ship  time.  For  example,  a  Seventh  Fleet  engagement  would  require  adjustment  • 

by  a  higher  percentage  than  the  Sixth  Fleet. 
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These  methods  are  appropriate  for  the  first  run  of  a  prototypical  planning 


model  until  better  data  or  methods  are  available.  A  merged  master  data  base 
was  created  of  data  elements  by  stock  number.  Exhibit  7  is  a  summary  of 
sources  of  key  data  elements. 

6.  Initial  Data  Base 

Dummy  values  were  selected  for  the  essentiality  code  and  base  order  and 
ship  time.  The  essentiality  code  was  set  to  a  value  of  one  and  the  Base  Order 
and  Ship  time  was  set  to  constant  value  of  fifteen  days. 

To  test  the  methodology  used  to  construct  the  item  specific  data  base,  a 
small  eleven  item  data  base  was  built  that  was  later  expanded  to  600  spares. 
Synergy  analysts  constructed  the  small  data  base  by  manually  extracting  each 
variable  from  the  appropriate  Navy  files.  Where  necessary  the  needed  data 
elements  were  constructed  by  using  hand  calculators.  These  computations  were 
then  checked  against  the  values  derived  by  the  Navy  computer  to  insure  that 
the  model  is  functioning  properly. 

7.  Expansion  of  the  Data  Base 

The  approach  selected  for  expansion  of  the  F-14  analysis  was  to  extend 
application  of  the  prototype  to  all  F-14  reparable  spares  for  which  data  were 
available.  Early  in  the  effort,  Synergy  provided  model  runs  based  on 
approximately  900  reparable  spare  items  for  the  F-14.  These  met  project 
technical  specifications  but  which  were  not  sufficiently  comprehensive  or 
trustworthy  for  use  in  the  CPAM  process.  Once  the  CPAM  crisis  time  had 
passed,  it  was  decided  to  pursue  more  detailed  information  on  F-14  spares  to 
expand  coverage  to  as  many  as  possible  out  of  about  4000  items.  Initial 
approaches  for  expanding  consideration  to  additional  items  consisted  of  the 
following  steps; 
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EXHIBIT  7 


SOURCES  OF  KEX  DATA  ELEMENTS 


Data  Elements 

Navy  Sources 

1. 

Master  Stock  Number 

ASO 

2. 

Unit  Price 

ASO 

3. 

Administrative  Lead  Time 

ASO 

4. 

Production  Lead  Time 

ASO 

5. 

Base  Order  and  Ship  Time 

Not  Available 

6. 

OFM  Total  Demand  Rate 

NAMSO 

7. 

Base  NRTS  % 

MAMSO 

8. 

Base  Repair  Cycle 

NAMSO 

9. 

Depot  Repair  Cycle 

NALC 

10. 

Base  Condemnation 

NAMSO 

11. 

Depot  Overhaul  Condemnation  % 

ASO 

12. 

Item  Essentiality  Code 

Not  Available 

13. 

Unit  Repair  Cost 

NALC 

14. 

On-order  Assets 

ASO 

15. 

Total  Assets 

ASO 

16. 

Quantity  per  Application 

ASO 

17. 

Percent  per  Application 

ASO 
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Identify 


scific  Stock  Numbers  tor  wnich  Data  is  Missing 


Synergy  produced  a  list  of  specific  National  Item  Indication 
Numbers  (NIINs)  for  which  data  are  missing.  This  project  was 
headed  by  Mr.  James  Lutz,  with  programming  support  by  Mr.  Rudolfo 
Dela  Garza. 

b.  Obtain  Missing  Data  from  Navy  Maintenance  Support  Office  ( NAMSO ) 

A  careful  review  was  made  of  the  stock  numbers  and  data  provided 
by  Aviation  Support  Office  (ASO) .  This  was  then  matched  up  to 
NAMSO  data.  Most  of  the  "holes"  in  the  initial  data  obtained 
turned  out  to  be  an  irreconcilable  result  of  attempting  to  match 
NIINs  to  Work  Unit  Codes  (WUC)  to  associate  failure  data  (by  WUC) 
with  items  (by  NUN) .  Mr.  Lutz  and  Mr.  Dela  Garza  visited  NAMSO 
representatives  Messrs.  Manny  Pierucci,  Jim  Kap,  and  Neil  Woodward 
(717/790-2031)  to  obtain  information  on  alternative  approaches  to 
data  extraction. 

Several  fallback  positions  were  developed  to  handle  this,  using 
other  data  sets. 

c.  Use  AVCAL  Data 

There  are  about  350  items  in  the  AVCAL  rotable  pool.  An 
interesting  exercise  for  its  own  sake  and  a  fine  fallback  for  this 
current  analysis  is  to  look  at  F-14  items  m  the  AVCAL  rotable 
pool.  Data  had  already  been  obtained  for  about  50  of  these  items 
for  the  F-14. 

Because  a  list  of  these  items  already  existed,  this  would  be  used 
to  focus  immediate  attention  on  these  data  if  the  research  at 
NAMSO  was  not  fruitful. 

d.  Use  FSC  Data 


To  the  extent  that  WUCs  could  not  be  linked  up  with  NIINs  (or  some 
other  reasonable  alternative  approach)  defaults  could  be  developed 
by  relating  the  NIINs  to  two-digit  Federal  Stock  Class  (FSC)  using 
U.S.  Air  Force  data  that  is  easily  attainable.  This  fallback  was 
based  on  the  assumption  that  it  is  better  to  have  a  reasonable 
estimate  for  every  stock  number  than  to  have  no  data  at  all. 

Use  Other  Available  Data 

Synergy  planned  to  use  every  set  of  data  obtainable  and  to  use  the 
CAPLOG  Model  ability  to  make  many  Different  runs  quickly,  to  bound 
the  problems  on  the  F-14.  Model  runs  had  already  been  made  using 
the  available  data  for  909  items.  When  additional  data  were 
obtained,  model  runs  could  be  made  on  that  individual  set  of  data 
to  create  nested  sets  of  model  runs.  These  model  runs  could  then 
be  used  to  draw  conclusions  and,  most  importantly,  to  look  for 
convergence  of  results. 
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It  was  extremely  Important  to  the  Navy  that  the  results  obtained  for  the 
F-14  had  credibility.  For  the  most  part,  the  credibility  required  is 
supported  by  the  quality  of  data  on  which  all  of  the  analyses  is  based.  For 
the  most  part,  this  seems  to  be  good  quality  data. 

Regardless  of  the  quality  of  the  data.  Synergy  has  amplified  the  basic 
model  results  with  a  number  of  different  sets  of  specially  scrubbed  data  in 
the  procedures  described  above. 

While  these  procedures  would  throw  doubt  on  the  model's  credibility  for 
some  purposes,  the  convergence  procedures,  the  data  scrubbing  procedures,  and 
the  particular  uses  of  this  model  combine  to  give  us  rather  high  confidence  in 
the  results  that  have  been  produced. 

First,  the  model  has  been  used  only  to  get  aggregate  current  capability 
results.  Specifically,  the  model  has  not  been  used  for  requirements 
determination  or  budgeting  procedures.  ASO  uses  tried  and  proven  procedures 
in  this  area.  The  entire  purpose  was  to  get  a  baseline  capability  estimate 
which  could  be  used  to  show  the  consequences  of  not  properly  funding  ASO's 
independently  determined  requirements  estimates. 

In  essence,  the  search  was  for  the  individual,  and  groups  of  individual 
spares  that  were  likely  to  ground  the  aircraft.  Fortunately,  the  Mission 
Degradation  portions  of  the  CAPLOG  Model  helped  to  isolate  the  top  25  spares 
which  are  causing  these  problems.  Basically,  this  was  a  set  of  very  critical 
spares  that  tend  to  ground  the  aircraft  in  wartime  in  a  way  that  is  slightly 
counter-intuitive,  either  by  virtue  of  the  fact  that  the  spares  are  common  to 
several  aircraft  or  by  virtue  of  the  fact  that  the  wartime  demand 
characteristics  and  repair  characteristics  for  the  spares  are  quite  different 
r  from  those  in  peace. 
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Typically,  in  the  Air  Force  (where  this  methodology  was  initiated)  a  small 


number  of  these  spares  somehow  passes  the  collective  intelligence  of  the 
system.  However,  in  the  environment  of  extreme  funding  shortfalls  (that  the 
Navy  logisticians  have  experienced)  people  have  to  suboptimize  allocation  of 
their  funds  and  their  objectives  tend  to  maximize  the  probability  of 
accomplishing  peacetime  missions.  When  this  occurs,  then  the  model  is 
credible  if  groups  of  spares  tend  to  cause  shortfalls  at  the  same  time. 

Ultimately,  the  fallback  positions  were  not  exercised  since  the  guidance 
received  from  NAMSO  allowed  for  the  production  of  an  F-14  data  base  with  2,033 
items,  a  significant  increase  over  the  earlier  data  base  of  only  909  items. 

Key  to  the  procedures  defined  by  NAMSO  personnel  was  a  method  to  derive  demand 
data  without  going  through  a  process  for  associating  WUCs  with  NUNs.  The 
NAMSO  file  manipulation  is  summarized  in  the  flow  chart  in  Exhibit  8. 

In  some  cases,  where  multiple  NXXNs  were  associated  with  a  WUC,  it  was 
necessary  to  compute  an  average  failure  rate  using  NAMSO  variables  as 
follows: 

Other  parameters  necessary  for  the  CAPLOG  data  base  are: 

1 .  Total  Organizational  and  Intermediate  Demand 

TOIMD  =  TMA  -  NRR 

2.  Base  Repair  Rate 

BRR  -  OIR/TOIMD 

3.  Base  NRTS  Rate 

NRTS  »  100  ( RNA  +  LOP  +  0AT)/T0IMD 

4.  Condemnation  Rate 

CN DR  -  CND/ ( CND  +  OIR) 

5.  Base  Repair  Time 

BRT  -  TAT/OIR 
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EXHIBIT  8 


NAI1S0  FILE  MANIPULATION 
(FAILURE  RATE  AND  REPAIR  CYCLES) 


,664 

TS 


*«•* 
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FAILURE  AND 
REPAIR 
CYCLE  DATA 
[2,8H6  NUNS) 


2,033  NIIN5 


f(N1)-£,/h1 


Avg.  FR 


NIINs 

Hours 

Removals 

Total 

Fail1 

NRR 

Failures 

Nl 

h1 

r1 

*1 

NR, 

n2 

h2 

r2 

h 

nr2 

fl2 

t«3 

* 

• 

h3 

r3 

f3 

T» 

• 

• 

fl3 

• 

• 

• 

N 

m 

• 

r  * 
m 

L  1 

- 

• 

• 

fim 

£(N2)“£2/h2 


f(N3)-f3/h3 


If  total  hours  for  F-14A  are: 


m 


i-1 


tea 


a 

-  £  v»i 

ffl 


rv 


Avg.  FR 


iff :h^-h 
for  each°i 


Then  an  estimate  of  the  average  failure  rate  (FR)  is: 


FR 


i-1 


fi*H 


iff  hi 


h. 


for  each  i 


’Total  Fail  -  NRR  +  Failures  where  NRR  -  (no  repair  required)  repress'  t  a  part 
removed  and  later  determined  operable  ( BRT) . 

The  variables  for  failure  data  are  taken  from  NAMSO  data  characterized  by  the 
record  layout  in  Figure  2. 


3: 


Where , 


TMA  =  Total  Maintenance  Actions 
NRR  *  No  Repair  Required 

OIR  *  Organizational  and  Intermediate  Repairs 

TAT  =  (Base)  Turn  Around  Time 

RNA  -  Repair  Not  Authorized 

LOP  =  Lack  of  Parts 

CND  =  Condemnations 

There  are  some  slight  differences  in  the  repair  cycle  flow  as 
characterized  by  the  NAMSO  data  on  one  hand  and  the  CAPLOG  model  on  the  other 
hand.  These  differences  are  not  significant  for  purposes  of  the  model 
results;  however,  the  fundamental  repair  cycles  are  portrayed  for  comparison 
in  Exhibit  9. 

8.  F-1 4  Data  Base  Listing 

NAMSO  verified  that  the  2,033  item  data  base  was  the  best  obtainable  for 
the  F-14.  Furthermore,  since  the  time  span  of  the  data  covered  one  year  of 
flying  activity  and  since  all  item  failures  are  recorded  in  the  NAMSO  data,  it 
is  safe  to  assume  that  items  not  in  the  data  base  had  not  failed  over  the 
course  of  a  year  and  therefore  missing  items  would  be  the  no-failure  items. 
This  meant  that  all  available  means  to  expand  data  coverage  on  the  F-14  had 
been  tried,  and  that  the  data  obtained  could  be  assumed  to  be  the  most 
accurate  and  extensive  available.  A  complete  listing  of  the  2,033  item  data 
base  is  available  in  other  deliverables  submitted  under  this  contract. 


EXHIBIT  9 

CAPLOG  VS.  NAMSO  —  REPAIR  CYCLE  FLOW 


B.  NAMSO 
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E.  Description  of  the  Flying  Hour  Inputs 

In  addition  to  the  item-specific  data,  ail  of  the  modules  require 
IMS-specific  flying  programs  over  time  for  both  peace  and  war.  The  flying 
hour  program  for  each  TMS  is  multiplied  by  the  quantity  of  a  given  spare  per 
application  (QPA)  and  summed  over  all  TMSs  to  get  the  total  number  of  flying 
hours  for  that  spare  as  a  function  of  time.  This  spare  part  flying  hour 
function  is  then  multiplied  by  the  appropriate  demand  rate  to  get  the  expected 
value  demand  function  for  each  spare  part.  In  addition  to  peace  and  wartime 
flying  hour  programs,  the  Mission  Degradation  Module  requires  information  on 
attritions  and  aircraft  down  time  in  order  to  fully  assess  wartime  capability 
and  sustainability. 

For  this  prototype  development,  flying  hour  parameters  based  upon  the 
"Carrier  Based  Air  Logistics  (CABAL)  Study"  were  used.  The  CABAL  study  was 
conducted  by  the  Rand  Corporation  for  the  Navy.  The  purpose  of  this  study  was 
to  estimate  the  workloads  facing  aircraft  intermediate  maintenance  departments 
under  various  peace  and  war  scenarios. 

This  study  contains  estimates  of  all  the  flying  hour  parameter  needed  to 
run  the  Mission  Degradation  with  a  model  Navy  flying  hour  program  during  this 
prototype  phase.  In  the  future,  more  accurate  and  updated  flying  hour 
programs  will  be  needed  in  order  to  make  the  capability  assessments  as 
accurate  as  possible.  Immediately  following  is  a  description  of  the  CAPLOG 


flying  hour  files: 


1 .  THE  PEACETIME  FLYING  HOURS  FILE 


This  file  contains  peacetime  flying  hours  and  inventories  for  all  TMSs. 


Variable 

_# 

Variable  Name 

Units 

Definition 

1 

Type/Model/ 
Series  ( TMS) 

NA 

Aircraft  mission  design/ 
series,  e.g.,  F-14A 

2 

Fleet  Flying 
Hours/ Day 

Hours/Day 

The  total  fleet  flying  hours 
per  day  for  each  TMS 

3 

Total  Aircraft 
Inventory 

Numbers 

of 

Aircraft 

Total  fleet  inventory  for 
nine  years  tor  each  TMS 

2.  THE 

WARTIME  FLYING 

HOURS  FILE 

This  tile 
the  percentage 
TMSs. 

contains  average  wartime  flying  hours  per  day  per  aircraft  and 
of  aircraft  during  a  certain  time  period  for  all  user-specified 

Variable 

_# 

Variable  Name 

Units 

Definition 

1 

Type/Model/ 
Series  (TMS) 

Aircraft  Type  Model  Series, 
e.g.,  F- 1 4A 

2 

Wartime  Flying 
Hours 

Flying 
hours/ day 

Average  wartime  flying  hours 
per  day 

3 

Percent  of 

Aircraft 

Available 

Percent 

Percentages  of  aircraft 
available  during  wartime 
periods,  specifically : 

period 

1 

days 

1-5 

period 

2 

days 

6-10 

period 

3 

days 

1  1-15 

period 

4 

days 

16-30 

period 

5 

days 

31-60 

period 

S 

days 

61-90 

period 

7 

days 

91-120 

period 

8 

days 

121-150 

period 

9 

days 

151-180 

! 
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3.  THE  MENU  FILE 


This  file  contains  the  user1 s  specified  TYPE/MISSION/SERIES  for  a 
particular  run  of  the  model. 


Variable  #  Variable  Name 


Units 


Definition 


*1  Type/Mission/ 

Series 


Aircraft  mission  design 
series 


MDSXREF 

This  file  contains  the  standard  MDS  dictionary. 


Variable  # 

Variable  Name 

Units 

Definition 

1 

Type/Mission/ 

Series 

Aircraft  mission  design 
series,  e.g.,  F-14A 

9 

4.  THE  ATTRITION  RATE  FILE 


This  file  contains  attrition  rates,  down  time,  and  sorties  length  by  TMSs. 
The  Attrition  Rate  File  is  unique  to  the  Mission  Degradation  Module 


Variable  # 

Variable  Name 

Units 

Definition 

1 

Type/Mi as ion/ 
Series  (TMS) 

Aircraft  mission  design 
series 

2 

Attrition  Rate 

Attrition 

/Sortie 

The  number  of  aircraft  lost 
per  sortie 

3 

Down  Time 

Hours/Day 

The  numoer  of  hours  per  day 
an  aircraft  is  assumed 
grounded 

4 

Sortie  Length 

Hours/ 

Sortie 

Hours  per  mission 

9 


9 


9 


9 


9 


44 


5.  THE  CUMULATIVE  ATTRITION  FILE 


This  file  contains  cumulative  attritions  by  TMS  for  ninety  days. 


Variable  # 

Variable  Name 

Units 

Definition 

1 

Type/Mission/ 

Series 

Aircraft  mission  design 
series,  e.g.,  F-14A 

2 

Attrition/Day 

The  number  of  grand 
cumulative  attrition  that 
were  lost  by  attrition  during 
a  specified  period 

6.  THE 

ITEM-SPECIFIC 

DATA  BASE 

Variable  # 

Variable  Name 

Units 

Definition 

1 

National  Stock 
Number 

National  Stock  Number 

2 

Unit  Price 

Dollars 

The  unit  price  of  an  item 

3 

Administrative 

Lead  Time 

Months 

The  administrative  lead  time 
is  the  time  between  preparing 
a  contract/purchase  order  and 
the  date  of  its  award  or 
order  initiation. 

4 

Production 

Lead  Time 

Months 

The  period  in  time  between 
planning  an  order  or  letting 
a  contract  and  the  date  of 
receipt  of  the  first 
production 

5 

Base  Order  and 
Ship  Time 

Days 

Total  number  of  calendar  days 
that  elapse  between  the 
initiation  of  a  request  for  a 
serviceable  item  from  the 
base  and  its  receipt 

6 

Demand 

Failures/ 

Million 

Flying 

Hours 

The  number  of  failures  at 
bases  for  replacement  of 
removed  unserviceable  spare 
parts  per  million  flying 
hours 

7 


BCM  % 


Percent 


The  percentage  of  base 
failures  that  must  return  for 
processing  at  the  depot 


Variable  # 
8 

9 

10 

1 1 

12 

13 

14 

15 

16 

17 


Variable  Name  Units 

Base  Repair  Days 

Cycle  Days 


Depot  Repair  Days 

Cycle  Days 


BCMs  Condemned  Percent 


Depot  Percent 

Condemnation 

Percent 

Item  1-5 

Essentiality 

Code 


Unit  Repair  Dollars 

Cost 


Dennition 

Total  number  or  calendar  days 
between  the  time  an 
unserviceable  item  is  removed 
from  use  and  the  time  it  is 
made  serviceable  in  base 
maintenance  and  ready  tor  use 

Total  number  or  repair  days 
between  tne  time  an 
unserviceable  item  is  removed 
from  use  and  the  time  it  is 
made  serviceable  trom  depot 
maintenance  and  ready  tor  use 

The  portion  of  base-processed 
units  that  were  beyond 
economical  repair,  theretore 
condemned 

The  portion  ot  depot 
processed  units  that  were 
beyond  economical  repair, 
therefore  condemned 

A  numeric  code  assigned  to  an 
individual  item  indicating 
its  relative  impact,  on 
mission  capability  in  the 
eent  of  a  stockout.  The  code 
is  a  ranking  factor  numbered 
on  (least  impact)  through 
five  (greatest  impact) 

Repair  cost  of  a  spare  part 


On-order 

Assets 

Total  Assets 


qpa 


Number  of 
Items 

Number  of 
Items 


The  model  is  programmed  to 
accept  nineteen  categories  of 
on-order  assets. 

The  model  is  programmed  to 
accept  a  total  of  fifteen 
categories  of  total  assets 
which  include  serviceable 
plus  unserviceable  and 
on-order  assets 


Number  of  Quantity  Per  Application 
Items 


Application 

Percent 


Percent  The  percent  of  a  particular 

IMS  that  has  this  particular 
part  on  it 
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F.  Model  Conversion 

1 .  Disk  to  Tape 

Copying  the  Overview  Model  from  its  resident  computer  system  to  a  magnetic 
tape  involved  approximately  35  separate  modules  (5,300  card  image  records). 

Two  separate  data  files  were  also  copied  to  tape,  a  large  "test"  data  file 
containing  all  data  necessary  to  run  the  model  and  an  F-14A  ten-spare  "real" 
data  file.  Included  with  these  files  was  a  pre-processor  FORTRAN  program 
which  creates  a  special  compressed  input  data  base. 

2.  Transferring 

After  contacting  the  tape  librarian  in  Macon,  Georgia  and  System  Support 
in  Atlanta,  the  tape  was  sent  via  Federal  Express  and  loaded  on  Synergy's 
RAMUS  II  system  library. 

3 .  Conversion-Compilation 

This  Involved  converting  the  model  from  BCD  (six  bytes)  to  ASCII  (four 
bytes)  word  configuration. 

All  arrays,  matrices,  and  formats  had  to  be  converted  to  allow  for  the 
different  word  configuration. 

Differences  in  FORTRAN  involved  re-writing  routines. 

4.  Conversion-Debugging/Verification 

After  the  model  compiled  successfully,  the  second  phase  in  the  conversion 
involved  debugging  and  verification. 

The  preprocessor  was  used  to  compress  and  re-create  the  required  input 
data  base  and  several  output  reports  were  compared  against  the  original 
reports  produced  by  the  model  before  conversion. 
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5 .  Conversion  —  Job  Control  Language 


Differences  in  JCL  caused  a  considerable  amount  of  reconstruction  and 
testing.  Manuals  were  ordered  from  Honeywell  to  define  the  Honeywell  RAMUS  11 
system  environment. 

6 .  Problems  Encountered 

Synergy  did  not  encounter  significant  system-related  problems.  The  able 
assistance  of  the  System  Support  staff  (especially  Mr.  David  Robles)  was 
especially  helpful. 

However,  not  having  a  high-speed  printer  for  computer  listings  and 
printout  reports  did  slow  the  conversion  process.  According  to  System  Support 
in  Atlanta,  there  is  not  one  RJE  (Remote  Job  Entry)  station  in  the  Washington 
metropolitan  area  hooked  up  to  RAMUS  11. 


Procedures  For  Accessing  The  Model 


1 .  Logging-on  to  RAMUS  II  Computer  System 

a.  Phone:  634-6500  (300  baud) 

634-6510  (1200  baud) 

b.  User  Information: 

User  ID  -  1700DCD23 1 
Password  -  RYNXCS 
Account  No.  -  409783 

2.  Input  Run  Parameters  File  -  (Runout) 

°  The  RUNOUT  file  contains  eight  segments  or  subfiles  (see 
Attachment  1 ) . 

a.  Sensitivity  Analysis  Parameters 

b.  Optional  Report  Selection 

c.  Scenario  Decisions 

d.  IMS  Selection 

e.  FSC  Selection 

f.  ALC  Selection 

g.  MSN  Selection 

h.  Flying  Hour  Programs  per  TMS 

*  To  change  any  parameter  or  record  within  a  subfile,  use  the  TSS 
(Time  Sharing  System)  editor. 

ex.  Change  the  "Base  Repair  Time  %"  from  100%  to  50%: 

*  EDIT  OLD  1700DCD2 31 /RUNOUT 
-  FVS :/BASE  REPAIR  TIME/ 

(Line  will  be  printed  here.) 


-  RVS:/1OO/:/05O/ 


(New  line  will  be  printed  here.) 

-  RESAVE  1700DCD23 1/RUNOUT 

-  DONE 


Running  the  Model 

*  CARD  OLD  1 700DCD23 1/BATCHDEG  (See  Attachment  2.) 

*  JRN 


SNUMB  XXXXA 

(Job  #) 

*  JSTS  XXXXA 

(Job  status. ) 

XXXXA  -02  EXECUTING 

(Job  is  executing) 

9 

*  JSTS  XXXXA 

(Job  status:) 

XXXXA  OUTPUT  WAITING 

(Job  has  finished  execution) 

* 

9 

Listing  the  Output  Reports 

*  JOUT  XXXXA 

(Transfers  output  to  work  buffer) 

FUNCTION?  LIST 

(Lists  all  report  types:) 

9 

SS 

(System  listing) 

74 

(Source  listing) 

06 

(Automatic  Report  6) 

9 

13 

(Optional  Report  11) 

14 

(Optional  Report  12) 

15 

(Optional  Report  13) 

9 

16 

(Optional  Report  14) 

t 
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1 .  Purpose 


rts 


i 

i 

I 

i 

I 


The  purpose  of  the  Mission  Degradation  Module  is  to  evaluate  the 
relationship  between  reparable  spare  inventory  investments  and  Navy  mission 
capabilities.  It  calculates  the  time  to  exhaustion  of  all  spare  parts  (NIINs) 
for  each  selected  aircraft.  It  calculates  the  number  of  aircraft  available 
for  mission  assignments  and  the  number  of  assembled  aircraft  as  a  function  of 
time.  The  module  provides  an  analysis  of  mission  sustainability  by 
type/mission/series  (TMS)  and  produces  reports  which  track  the  extent  of 
mission  degradation  due  to  a  shortfall  of  spare  parts. 

The  Mission  Degradation  Module  can  be  thought  of  as  a  reproduction  of  a 
real  world  Navy  logistics  resupply  system.  This  real  world  system  is 
complicated  and  can  only  be  handled  by  a  means  of  simplified  representation  or 
model.  This  representation  is  symbolized  in  the  algorithms  and  assumptions 
that  comprise  the  model. 

2.  Assumptions 

The  following  is  a  list  of  the  principal  explicit  and  implicit  default 
assumptions  used  in  making  the  Mission  Degradation  Module  runs: 

a.  The  data  received  from  the  various  Navy  sources  is  accurate, 

b.  Low  aircraft  attrition; 

c.  Peacetime  flying  hour  programs  continue  at  historical  levels; 

d.  Every  spare  is  assumed  to  be  equally  essential  (therefore,  the 
model  may  underestimate  capability  in  some  mission  situations); 

e.  All  on-hand  assets  are  combined  and  available; 

f.  The  F-14  draws  from  the  same  pool  of  common  spares  that  other 
aircraft  do  (therefore,  it  may  overestimate  capability); 

g.  No  spares  are  given  to  allies; 

h.  No  attrition  or  loss  of  spares  at  bases  or  depots  or  in  transit; 
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i.  Repair  times  remain  at  peacetime  levels  despite  increased  wartime 
workloads, 

j.  No  spare  transportation  or  distribution  problems; 

k.  Unserviceable  assets  have  not  been  repaired  at  the  start  of  the 
war, 

l.  The  Navy  can  perform  its  missions  with  some  aircraft  in  a 
non-operative  status;  they  are  then  cannibalized  to  provide  spare 
parts  to  essential  aircraft; 

m.  All  spares  in  wholesale  and  retail  systems  are  assumed  to  get  to 
the  right  plane  on  the  right  day. 

3.  Caveats 

The  model's  best  estimates  provide  useful  working  hypotheses  until  other 
evidence  is  developed.  Sensitivity  analyses  are  also  needed  to  show  the 
likely  effects  of  changes  in  assumptions  and  of  changes  in  Navy  actions. 

4 .  Model  Outputs 

The  Mission  Degradation  Module  produces  a  number  of  analytic  reports  that, 
when  taken  together,  present  a  comprehensive  analysis  of  Navy  mission 
capability  and  sustainability  based  on  reparable  spare  part  availability. 

This  section  describes  and  presents  examples  of  the  different  reports  that 
constitute  the  output  of  the  Mission  Degradation  Module.  These  reports  are: 

•  NSN  of  the  first  part,  causing  TMS  to  have  zero  flyable  aircraft; 

•  Sorties  level  Summary  Report; 

°  Aircraft  availability  results; 

*  Mission  Degradation  Analysis  Report; 

*  Reparable  Spare  Maintainability  and  Reliability  Priority  Analysis 
Report; 


53 


9 


Base  Repair  Costs/100  Largest  Items 


°  Depot  Repair  Costs/ 100  Largest  Items, 

°  Condemnation  Costs/100  Largest  Items; 

°  Critical  Parts  Report. 

The  examples  which  follow  are  excerpts  from  a  baseline  run  of  the  CAPLOG 
Model. 


» 
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5.  MSN  of  the  First  Part  Causing  a  TMS  to  Have  Zero  Flyable  Aircraft 
The  purpose  of  this  report  is  to  present  a  list  of  National  Stock  Numbers 
of  the  first  part  that  causes  a  TMS  to  have  zero  flyable  aircraft  due  to  the 
unavailability  of  this  spare  part.  A  sample  of  the  report  is  attached, 
immediately  following  is  information  on  each  column  heading. 


Column 

Heading 

Description 

1 

NSN 

This  column  presents  the  National  Stock 
Number  of  the  first  part  causing  zero 
flyable  aircraft. 

2 

DAY 

This  column  shows  the  day  on  which  this 
part  causes  zero  flyable  aircraft. 

3 


TMS 


This  column  shows  which  TMS  has  zero 
flyable  aircraft. 


EXHIBIT  12 

NSN  OF  THE  FIRST  PART  CAUSING 
A  TMS  TO  HAVE  ZERO  FLYABLE  AIRCRAFT 


SYNERGY.  INC.  OVERVIEW  NOBEL  NISSION  DEGRADATION  NODULE  REPORT  6  PAGE  8 
CAP  L0C-FB1  4A  DON  ZINNERNflN  8/86/82  UNCLASSIFIED 

NSN  OF  THE  FIRST  PART  CAUSING  FOLLOWING  HDS  TO  HAVE  O  FLYABLE  AIRCRAFT  ON  THAT  GIVEN  DAY 


NSN  DAY  HDS 

589581031383888  48  F814A 


EXHIBIT  13 


SORTIES  LEVEL  SUMMARY  REPORT 


STICKY'  INC.  OVERVIEW  flOSEL  HISSION  DEGRADATION  IfOSULE  REPORT  6  PAGE  9 
CAP  LDG-F0]  4ft  DON  ZIJWERHAN  11/66/82  UNCLNSSIFia 

StWARY  FOR  1981  (SPARES  KITH  ESSENTIALITY  CODES  A-J) 

SAY  AT  WHICH  PERCENT  PERCENTAGE  SORTIES 

SORTIES  FLOWN  REACH  FLOUN  FOR  VARIOUS 

VARIOUS  LEVELS  HISSIBN  BAYS 

FIRST  DRY  BELOW  MISSION  BAY 

THS  1862  752  502  252  5  10  15  20  30  45  66 

F014A  70  84  199  0  160  100  194  160  108  100  100 


» 
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6 .  Sorties  Level  Summary  .Report 

This  report  provides  the  information  about  the  first  day  at  which  percent 
sorties  flown  reach  below  the  100%,  75%,  50%  and  25%  levels,  and  percent 
sorties  flown  on  the  5th,  10th,  15th,  20th,  30th,  45th,  and  60th  mission  days. 
A  sample  of  this  report  follows.  It  defines  the  nature  of  the  iniormation 


presented  under  each  of  the  column  headings  of  the  report. 


DESCRIPTION  OF  SORTIE  LEVEL  SUMMARY  REPORT 


Column 

Heading 

Information 

1 

TMS 

This  column  represents  the  user's 
specified  TMS  number  for  a  particular 
run  of  the  program. 

2 

100% 

(Level) 

This  column  represents  the  first  day  at 
which  percent  sorties  flown  reach  below 
100%  level. 

3 

75%  (Level) 

This  column  represents  the  first  day  at 
which  percent  sorties  flown  reach  below 
75%  level. 

4 

50%  (Level) 

This  column  represents  the  first  day  at 
which  percent  sorties  flown  reach  below 
50%  level. 

5 

25%  (Level) 

This  column  represents  the  first  day  at 
which  percent  sorties  flown  reach  below 
25%  level. 

6 

5  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  5th  mission  day. 

7 

10  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  10th  mission  day. 

8 

15  (Mission 
day) 

This  columnn  displays  the  percentage 
sorties  flown  on  15th  mission  day. 

9 

20  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  20th  mission  day. 

10 

30  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  30th  mission  day. 

11 

45  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  45th  mission  day. 

12 

60  (Mission 
day) 

This  column  displays  the  percentage 
sorties  flown  on  60th  mission  day. 

9 


9 
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The  purpose  of  this  report  is  to  present  the  model's  estimate  of  the 
percent  of  the  orginal  aircraft  and  the  percent  of  the  nonattrited  aircraft 
that  are  available  to  perform  Navy  missions  on  selected  days  of  the  war. 

A  sample  of  this  report  is  attached;  immediately  following  is  information 
on  each  column  heading: 


Column 


Heading 


Description 


This  column  shows  the  TMS  for  which  the 
information  is  given. 


WAR  DAT  The  first  row  provides  an  estimate  for 

the  percent  of  the  original  aircraft 
available  for  Navy  missions  on  selected 
days  of  the  war.  The  second  row 
provides  an  estimate  for  the  percent  of 
the  nonattrited  aircraft  available  for 
air  mission  on  selected  days  of  war. 


EXHIBIT  14 
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8.  Mission  Degradation  Analysis  Report 

The  purpose  of  this  report  is  to  show  what  additional  mission  capability 
can  be  provided  when  USN  policy  permits  aircraft  to  be  cannibalized.  There 
are  three  parts  to  this  report.  In  Part  1  the  mission  degradation  is  shown  by 
presenting  the  percent  of  scheduled  sorties  that  are  flown  for  each  day.  In 
Part  2  a  "come  as  you  are"  war  is  presented  when  only  serviceable  assets  apply 
and  where  standard  base  and  depot  repair  times  were  maintained.  In  Part  3  the 
mission  degradation  is  shown  by  comparing  mission  requirements  to  missions 
accomplisned.  Samples  of  all  parts  are  included. 

Part  two  of  this  report  shows  that  as  the  war  progresses  the  number  of 
assembled  aircraft  (*)  decrease.  Also,  as  the  war  progresses,  the  number  of 
cannibalized  aircraft  increases  (+) .  The  number  of  flyable  aircraft  (*)  is 
smaller  than  the  number  of  assembled  aircraft  because  some  assembled  aircraft 
need  spares  before  they  are  flyable.  In  this  example,  the  percentage  of 
missions  flown  (%)  by  flyable  aircraft  decreases  until  day  85  when  repaired 
spares  return  from  the  depot.  With  their  return,  the  percentage  of  missions 
flown  increases,  the  number  of  flyable  aircraft  increases,  and  the  number  of 
cannibalized  aircraft  decreases. 

Part  three  of  this  report  shows  which  aircraft  fail  to  meet  the  mission 
requirement  by  comparing  the  Daily  Flying  Hours  Requirement  (*)  and  the  Flying 
Hours  Accomplished  (*)  for  each  aircraft. 


* 
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EXHIBIT  15 


nwcTsiw-tWInl  13 


MISSION  DEGRADATION  ANALYSIS  REPORT 


PART  I 

synergy.  rue.  cuoaiiEii  ncjel  mesicn  jegradation  coddle  ps^t  u  ^  i 
WTt  3URU1EH  TS  DON  DINNERNAN  3-^SS  unclassified 

SENS  f9S  «HICH  THE  PEACE  ’Ilf  USAGE  EXCEEDS  IN1TI&  IWQiTOSY  LEVEL 

LISTS  IIL  .  TOTAL  PEACE  USAGE  .  POKE  CCNDEHNMIONS  .  AND  PEACE  PIPELINE. 
RESULTING  IIL  3EC5EPSED  3Y  '« 


SYNERGY.  INC.  jOEJWIE«  >G3EL  MSSICN  DEGSPLWTTCft  NODULE  REPORT  11  PAGE  £ 
HUY  OUWIEH  TS  Dull  IINNERNAN  .  S/06'32  UNCLASSIFID 

YEf*=t981  ATTRITION  PATE  USED:  9.8939  FOR  NOS:  79I4A 


REQUIRED 

30RJIE  RATE 

LOST 

MS 

PERCENT 

PLYING 

SORTIE 

ASSENSLEJ 

3Y 

chflYABLE 

MS 

a, 'ABLE 

SORTIES 

HOURS 

CUN  HOURS 

JAY 

HOURS 

LENGTH 

FLEET 

EACH  3CF7  AIRCRAFT 

ATTRITION  AIRCRAFT 

PERCENT 

AIRCRAFT 

FLOW 

FLOW 

arim 

1 

518. 

2.38 

259. 

1.0A 

259. 

1.88 

9. 

0. 

259. 

188. 

518. 

513. 

5 

518. 

2.88 

259. 

1.08 

253. 

1.88 

9. 

8. 

258. 

188. 

518. 

1936. 

3 

518. 

2.88 

259. 

1.01 

257. 

1.88 

0. 

8.14 

257. 

188. 

518. 

1854. 

4 

'18. 

2.88 

259. 

1.82 

256. 

1.88 

2. 

9.59 

254. 

188. 

518. 

2872. 

5 

518. 

2.88 

259. 

1.83 

255. 

1.88 

3. 

1.23 

252. 

188. 

518. 

2598. 

$ 

518. 

2.88 

259. 

1.84 

254. 

1.88 

5. 

1.87 

249. 

138. 

518. 

3183. 

7 

518. 

2.88 

259. 

1.85 

253. 

1.88 

6. 

2.12 

247. 

188. 

513. 

3626. 

8 

518. 

2.88 

259. 

1.86 

252. 

1.88 

8. 

3.13 

244. 

198. 

518. 

4144. 

8 

518. 

2.88 

259. 

1.87 

251. 

1.88 

18. 

3.33 

241. 

188. 

518. 

4662. 

18 

518. 

2.88 

259. 

1.88 

258. 

1.88 

11. 

4.58 

239. 

188. 

518. 

5188. 

11 

777. 

2.88 

339. 

1.65 

249. 

1.88 

13. 

5.17 

236. 

188. 

777. 

5957. 

12 

777. 

2.88 

289. 

1.67 

249. 

1.88 

16. 

6.41 

232. 

188. 

777. 

6734. 

13 

777. 

2.88 

399. 

1.78 

247. 

1.88 

18. 

7.39 

229. 

188. 

777. 

7511. 

14 

777. 

2.88 

389. 

1.72 

246. 

1.88 

21. 

3.39 

225. 

188. 

777. 

8238. 

15 

777. 

'  2.88 

389. 

1.75 

245. 

1.88 

23. 

9.39 

222. 

188. 

777. 

5865. 

16 

622. 

2.88 

311. 

1.42 

244. 

1.88 

25. 

18.45 

219. 

188. 

622. 

9687. 

17 

622. 

2.88 

311. 

1.45 

243. 

1.88 

£8. 

11.45 

215. 

188. 

622. 

18389. 

13 

622. 

2.88 

311. 

1.47 

242. 

1.88 

38. 

12.54 

212. 

188. 

622. 

18931. 

13 

622. 

2.88 

Ill. 

1.4S 

241. 

1.88 

33. 

13.63 

288. 

188. 

622. 

11553. 

23 

622. 

2.88 

311. 

1.52 

248. 

1.88 

35. 

14.73 

285. 

188. 

622. 

12175. 

21 

622. 

2.88 

311. 

1.55 

239. 

1.88 

33. 

15.83 

291. 

188. 

622. 

12797. 

22 

622. 

2.88 

311. 

1.57 

238. 

1.88 

48. 

16.35 

!98. 

198. 

622. 

13419. 

23 

622. 

2.88 

311. 

1.68 

237. 

1.88 

42. 

17.34 

195. 

188. 

622. 

14841. 

24 

622. 

2.88 

311. 

1.63 

236. 

1.88 

45. 

18.91 

191. 

188. 

622. 

14663. 

23 

622. 

2.88 

311. 

1.66 

235. 

1.88 

47. 

28.16 

188. 

108. 

622. 

15285. 

26 

622. 

2.88 

311. 

1.69 

234. 

1.88 

58. 

21.23 

134. 

198. 

522. 

15987. 

27 

622. 

2.88 

311. 

1.72 

233. 

1.88 

52. 

£2.32 

181. 

198. 

622. 

16529. 

28 

622. 

2.88 

311. 

1.75 

232. 

1.88 

55. 

23.56 

177. 

188. 

622. 

17151. 

23 

622. 

2.88 

311. 

1.79 

231. 

1.88 

57. 

24.32 

174. 

188. 

622. 

17773. 

38 

622. 

2.08 

311. 

1.33 

238. 

1.88 

68. 

26.86 

178. 

198. 

622. 

16395. 

31 

329. 

2.88 

415. 

2.48 

1.88 

62. 

27.01 

167. 

188. 

329. 

19224. 

32 

823. 

2.88 

415. 

2.56 

22s! 

1.88 

66. 

28.39 

162. 

198. 

829. 

28853. 

33 

323. 

2.88 

415. 

2.64 

227. 

1.88 

79. 

39.32 

157. 

188. 

329. 

20882. 

34 

329. 

2.88 

415, 

2.73 

226. 

1.88 

74. 

32.74 

152. 

198. 

329. 

21711. 

35 

329. 

2.88 

415. 

2.32 

225. 

1.88 

73. 

34.71 

147. 

198. 

329. 

22548. 

36 

329. 

2.88 

M5. 

2.91 

224. 

1.88 

82. 

36.51 

142. 

188. 

829. 

23369. 

** 

it 

329. 

2.08 

415. 

3.81 

223! 

1.88 

35. 

38.33 

138. 

198. 

ODQ. 

24190. 

38 

329. 

2.88 

415. 

3.12 

222. 

1.88 

39. 

49.16 

133. 

188. 

329. 

25827. 

33 

329. 

2.88 

415. 

3.23 

221. 

1.88 

93. 

42.91 

123. 

198. 

329! 

25356. 

48 

329. 

2.38 

415, 

3.36 

228. 

1.08 

97. 

43.38 

123. 

198. 

329. 

26685. 

41 

329. 

2.88 

415. 

3.43 

219. 

1.38 

189. 

45.61 

119. 

198. 

329. 

27514. 

42 

329. 

2.38 

415. 

3.61 

219. 

1.98 

183. 

47.31 

115. 

188. 

329. 

28343. 

43 

329. 

2.88 

415. 

3.73 

217. 

1.98 

186. 

*8.32 

111. 

198. 

329. 

29172. 

44 

329. 

2.88 

415. 

3.36 

216. 

1.88 

109, 

59.33 

107, 

198. 

329, 

18991. 

45 

329. 

2.88 

415. 
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46 
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2.88 

415. 

4.88 

214. 
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115. 

53. 5? 

99. 

96. 

795. 

31624. 

47 

329. 

2.88 

415. 

4.88 

213. 

0.92 

118. 

55.27 

95. 

92. 

762. 

32386. 

48 
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2.88 

415. 

4.88 

212. 

0,39 

120. 

56.72 

92. 

89. 

734. 

33121. 

*3 
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415. 
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211. 

0.85 
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787. 

33823. 

58 
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2.88 

415. 

4.88 

218. 

0.32 

125. 

39.56 

35. 

32. 

681. 

34589. 

51 

329. 

2.88 

415. 

4.88 

218. 

9.79 

129. 

68.25 

82. 

79. 

655. 

35163. 

52 

329. 

)  ft) 

415. 

4.88 

299. 

9.76 

138. 

62.27 

79. 

76. 

638. 

35793. 

53 

329. 

2.08 

415. 

4.08 

288. 

6.73 

132. 

63.55 

76. 

73. 

687. 

36489. 

54 

329. 

2.08 

415. 

4.08 

297. 

0.79 

134. 

64.22 

73. 

78. 

533. 

36583. 

53 

323. 

2.88 

415. 

4.08 

■97, 

■0.63 

136. 

66.95 

"9. 

68. 

361. 

•7544. 
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Mission  Degradation  Analysis  Report 


Part  1 


Column 


Headinc 


Information 


This  column  shows  the  number  of 
days  since  the  beginning  of  the 
time  period  being  analyzed. 


REQUIRED  FLflNG 
HOURS 


This  column  shows  the  number  of 
flight  hours  that  the  particu¬ 
lar  TMS  being  studied  must  fly  on 
the  day  shown  on  the  same  line  in 
order  to  satisfy  the  USN  mission 
requirement  for  that  TMS. 


SORTIE  LENGTH 


This  column  shows  the  average 
number  of  flight  hours  required 
for  each  aircraft  on  each  sortie 
flown  on  the  day  shown  on  the 
same  line. 


NUMBER  OF  AIRCRAFT 
SORTIES 


This  column  shows  the  number  of 
aircraft  sorties  which  must  be 
flown  on  the  day  shown  to  satisfy 
the  USN  mission  require-ment  for 
that  day.  The  number  of  sorties 
is  obtained  by  dividing  Required 
Flying  Hours  (Column  2)  by  Sortie 
Length  (Column  3)  and  rounding  up 
to  the  next  whole  number. 


SORTIES  PER 
AIRCRAFT 


This  column  shows  the  number  of 
sorties  flown  by  each  aircraft 
that  flies  missions  on  the  day 
shown.  This  number  is  obtained 
by  dividing  number  of  Aircraft 
Sorties  (Column  4)  by  Flyable 
Aircraft  (Column  11). 


ASSEMBLED  AIRCRAFT 


This  column  shows  the  number  of 
assembled  aircraft  available  to 
carry  out  the  mission  on  the  day 
shown.  The  number  that  appears 
on  any  day  is  equal  to  the  num¬ 
ber  presented  on  the  previous  day 
minus  those  aircraft  lost  by 
attrition  on  the  previous  day. 
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LOST  BY  ATTRITION 


NCMS  UNFLYABLE 
AIRCRAFT 


NMCS  PONT 

FLYABLE  AIRCRAFT 


PERCENT  SORTIES 
FLOWN 

HOURS  FLOWN 


This  column  shows  the  number  of 
aircraft  that  were  lost  by 
attrition  on  the  day  shown.  The 
number  is  obtained  by  multiplying 
the  attrition  percentage  (not  shown) 
by  the  Number  of  Aircraft  Sorties 
(Column  4) . 

This  column  shows  the  number  of 
assembled  aircraft  that  cannot  fly 
because  they  are  missing  a  spare 
part  on  the  day  shown,  and  the  part 
missing  cannot  be  obtained  either 
from  inventory  or  from  other  NMCS 
aircraft. 

This  column  shows  the  rates  of  NMCS 
unflyable  aircraft  to  assembled 
aircraft. 

This  column  shows  the  number  of 
aircraft  that  are  flyabie  on  the  day 
shorn.  The  number  is  obtained  by 
subtracting  the  number  of  unflyable 
aircraft  (Column  7  +  Column  8)  from 
Assembled  Aircraft  (Column  6). 


This  column  shows  the  percent  of 
required  sorties  flown. 

This  column  shows  the  total  number 
of  flight  hours  the  model  estimates 
will  be  flown  on  that  day. 

This  column  shows  the  cumulative 
flight  hours  the  model  estimates 
will  be  flown  up  to  that  point  in 
time . 


PART  NUMBER/CUM 
HOURS  FLOWN 


9.  Reparable  Spare  Maintainability  and  Reliability  Priority 
Analysis  Report 

This  report  is  produced  by  the  Mission  Degradation  Module.  In  it,  the 
total  dollar  cost  for  buying,  repairing,  and  condemning  all  parts  tuat  are 
used  to  support  a  given  force  structure  of  TMS  for  a  specified  flight  program 
is  first  computed.  These  parts  are  then  sorted  and  arranged  in  order  of 
highest  total  cost.  The  first  100  parts  on  this  list  are  those  which  require 
the  most  money  to  replace;  from  them  the  report  gets  its  nickname:  "100 
Greatest  Thieves  Report.” 

A  sample  of  this  report  is  attached;  immediately  following  is  information 


on  each  of  the  column  headings: 


Column 


Headinc 


PART  NUMBER 


TOTAL  COST 


FAILURES 


BASE  REPS 


DEPOT  REPS 


CONDEMNED 


Information 

This  column  shows  the  MSN  of  a 
particular  reparable  Bpare. 

This  column  shows  the  total 
dollar  cost  required  to  purchase 
and  repair  the  part  throughout 
the  flight  program. 

This  column  shows  the  total 
number  of  failures  of  the  part 
which  occurred  during  the  flight 
program. 

This  column  shows  the  total 
number  of  the  part  repaired  at 
the  base  repair  shops  to  support 
the  flight  program. 

This  column  shows  the  total 
number  of  the  part  repaired  at 
the  depot  repair  shops  to 
support  the  flight  program. 

This  column  shows  the  total 
number  of  the  part  condemned  to 
support  the  flight  program. 
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EXHIBIT  18 

REPfffiflW  SPARE  IMINTRINMIL1TY  fHtl  RELIA1ILITY  PRIORITY  RNRLYSIS 
HflSTER  STOCX  HO  TOTAL  COST  FAILURES  BASE  REPS  DEPOT  REPS 


1  66151 1)623919 

48863737. 

2  1431001216932 

24581887. 

3  1430104217121 

12845367. 

4  1430091408475 

12498930. 

5  1430001425512 

11918964. 

6  1430010175299 

11716388. 

7  5915004655066 

10660550. 

8  1430019734475 

10571580. 

9  1430001217299 

10372745. 

10  1430901239369 

9036817. 

11  1659006191673 

8189419. 

12  1095006300762 

7921572. 

13  1430091228112 

7273659. 

14  5895010313833 

6941856. 

15  1630010600941 

6791798. 

16  5895010313664 

6382489. 

17  6610014199233 

6185504. 

18  1430091217359 

5248926. 

19  1430001236781 

5057652. 

20  1430001238886 

4485658. 

21  1270001487299 

4360558. 

22  5960001306794 

4184077. 

23  1430010138638 

4176419. 

24  1440010123294 

4157233. 

25  6605019110855 

3239081. 

26  1430001239376 

3801687. 

27  1430091216946 

2727379. 

28  6605005291526 

2651206. 

29  1430010867689 

2514237. 

30  1440090513187 

2194358. 

31  6610010197093 

17P8376. 

32  5865001345421 

1761106. 

33  5895008148395 

16*5921. 

34  66050 10041613 

16*2501. 

35  1270010518683 

1575354. 

36  1270001487262 

1564923. 

37  5826901688769 

1454434. 

38  5865010663265 

1330902. 

39  5895001490701 

13*3557, 

40  6130010299187 

1313458. 

41  6615001376538 

1246003. 

42  6615019912877 

1202019. 

43  1430001538347 

1186745. 

44  5895001486988 

1125492. 

45  6615001592298 

1048840. 

46  5895901490698 

1046686. 

47  6605004112317 

1026064. 

48  6115001618782 

989843. 

49  5895002395200 

941573. 

50  1560010295013 

938329. 

1356. 

1332. 

40. 

590. 

403. 

171. 

426. 

377. 

53. 

476. 

455. 

23. 

942. 

953. 

10. 

1322. 

1316. 

14. 

518. 

388. 

136. 

581. 

564. 

27. 

895. 

879. 

18. 

698. 

686. 

21. 

862. 

514. 

357. 

586. 

472. 

115. 

699. 

681. 

18. 

492. 

481. 

16. 

702. 

14. 

584. 

355. 

335. 

22. 

609. 

581. 

38. 

545. 

531. 

12. 

675. 

664. 

13. 

500. 

487. 

14. 

657. 

639. 

24. 

226. 

0. 

126. 

427. 

420. 

9. 

1685. 

1386. 

328. 

119. 

26. 

96. 

340. 

286. 

59. 

434. 

432. 

4. 

85. 

85. 

2. 

373. 

369. 

7. 

1059. 

266. 

452. 

448. 

430. 

28. 

131. 

123. 

9. 

508. 

500. 

16. 

128. 

129. 

2. 

347. 

348. 

4. 

337. 

331. 

8. 

711. 

688. 

33. 

186. 

181. 

7. 

74. 

63. 

9. 

89. 

33. 

7. 

451. 

50. 

412. 

217. 

211. 

10. 

182.  ‘ 

2. 

146. 

141. 

138. 

6. 

115. 

6. 

112. 

101. 

88. 

11. 

409. 

0. 

410. 

845. 

501. 

323. 

110. 

38. 

26. 

37. 

32. 

5. 

This  report  presents  the  Master  Stock  Number  of  the  100  items  with  the 
largest  base  repair  cost.  This  report  provides  information  on  the  number  and 
type  of  items  and  type  of  items  that  require  the  most  dollar  resources  at  the 
base  repair  facility  needed  to  support  a  given  wartime  flying  hour  program.  A 
sample  of  the  report  is  attached;  and  the  following  defines  the  nature  of  the 
information  presented  under  each  of  the  column  headings  of  this  report. 


Column 

Heading 

Information 

1 

MASTER  STOCK 

NUMBER 

This  column  shows  the  Master 

Stock  Number  of  the  items  to 
repaired  at  the  base. 

be 

2 

TOTAL  COST 

This  column  shows  the  total 
wartime  base  repair  cost  for 
MSN. 

this 

3 

NUMBER 

This  column  shows  the  total 
number  of  wartime  base  repairs 
repaired  at  the  base. 

EXHIBIT  19 


BASE  REPAIR  COSTS/lOO  LARGEST  ITEMS 


SINE *61.  INC.  OVERVIEW  NOOEt  MISSION  DEGBA041ION  MOGULS  REPORT  * 
MARCH  1982  CALVERT  MOCKER  10/14/82  UNCLASSIFIED 

9»SE  REPAIR  COSfS/  100  LARGEST  ITEMS 


MASUK  STOCK  NO 

, TOTAL  cost 

MU*9C1 

1 

6605010944518 

1522949. 

236 

2 

1220010896262 

61 3540. 

tu 
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221433. 

214 

4 

586 50 110282268 W 

192212. 

163 

5 
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182824. 
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6 
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1  30 
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104  3 

» 
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122149. 
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9 
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103242. 
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to 
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11 
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88038. 

138 

12 
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65099. 

128 

IS 
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32 

u 
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56632. 

139 

IS 
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43 

16 
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123 

12 
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42444. 

4 

18 
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83 

19 

6260004242984 

38165. 

134 

20 

5821010512886 

36943. 

133 

21 

1S60010832648FJ 

33848. 

40 

22 

5821010401255 

28235. 

208 

25 

1220010292619 

22362. 

35 

24 

1220010659465 

24016. 

22 

2S 

6340010526299 

19853. 

61 

26 

1630003969632 

19114. 

486 

22 

3826010883650 

18530. 

64 

28 

661501103295S 
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46 

29 

2995010650082 

12342. 

32 

JO 

5 86 5004 26 3 t 44 Ew 

16266. 
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51 
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89 

32 
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80 

SS 

S8200102624S3C* 
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54 

582 00 102624 54 C 4 
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SS 
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14115. 

28 

36 

661501021 3681 

13843. 

T9 

57 

66100109961  86 

1 3221. 

9 

38 

S8210I0569616 

131*6. 

71 

59 

284001 109624218 

13166. 

3 

to 

3865Q10920386EW 

12286. 

85 

41 

5821010621019 

12653. 

56 

1 2 

1660003628832 

12112. 

36 

AS 

6260004051090 

11564. 

38 

44 

5826010409298WF 

11051. 

22 

ts 

586500321 JJ44EW 

10932. 

44 

44 

5821010031336 

10256. 

68 

4  2 

1650010125811 

10021. 

25 

t  A 

SR650108Q3623EU 

9952. 

55 

49 

5821011041625 

9816. 

9 

so 
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9801. 

t?4 

51 

6613010330622 

9650. 

74 

52 
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8288. 

16 
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28 

54 

586301 1040864EN 
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8360. 

1 

52 
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6? 

54 
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This  report  presents  the  Master  Stock  Number  o £  the  100  items  with  the 
largest  depot  repair  cost.  This  report  provides  information  on  the  numoer  and 
type  of  items  that  require  the  most  dollar  resources  at  depot  repair  facility 
to  support  a  given  wartime  flying  hour  program. 

A  sample  of  the  report  is  attached,  and  the  following  defines  the  nature 
of  the  information  presented  under  each  of  the  column  headings  of  this  report. 


Column 

Heading 

Information 

1 

MASTER  STOCK. 

NUMBER 

This  column  shows  the  Master 

Stock  Number  of  the  item  to  be 
repaired  at  the  depot. 

2 

TOTAL  COST 

This  column  shows  the  total 
wartime  depot  repair  cost  by  NSN. 

3 

NUMBER 

This  column  shows  the  total 
number  of  wartime  depot  repairs. 

EXHIBIT  20 


DEPOT  REPAIR  COSTS/lOO  LARGEST  ITEMS 


UNMtr.  INC.  OVIHVICU  N06EL  MISSION  » (  G» » 0 »  I  |  ON  NODULE  »£PO«t  «  P»GE 

N4RCH  1932  C4LVCRI  HOCK  CM  10/14/82  IIHCltSSIHED 

« 

DEPOT  IIPIII  COSTS/  100  LARGEST  HENS 


u 


NKSIE*  STOCK  NO  Tom  COST  NUMBER 


1  6605010944518  ' 

2  2840010611*0110 

3  284001109624710 

4  S86S00371  3344EW 

5  S86S01 081 S?47EU 
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33  1650010129134 

34  3865001994210(0 
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56  386501021 1731EU 
37  284000396882519 

A* 


3045981. 

152 

1 389021. 

35 

510188. 

36 

404995. 

545 

2731 19. 

34 

245187. 

2075 

241758. 

30 

210330, 

59 

207484. 

53 

204298. 

17 

191  329. 

46 

184808. 

36 

169385. 

53 

148355. 

S3 

140202. 

58 

1  33781  . 

17 

126643. 

78 

124714. 

22 

122912. 

as 

119855. 

15 

119159. 

3 

116886. 

13 

116311. 

17 

110098. 

11 

98333. 

28 

95008. 

14 

90906. 

53 

73918. 

48 

71997. 

42 

70369. 

27 

70209. 

10 

66885. 

65 

66312. 

31 

66122. 

32 

64707. 

4 

64677. 

11 

61751. 

4 

55505. 

33 

54134. 

93 

53947, 

75 

53159. 

39 

52211. 

56 

49700. 

45 

49082. 

29 

46427. 

35 

46164. 

15 

43652. 

68 

44615. 

74 

44210. 

6 

42042. 

20 

41376. 

19 

40109. 

46 

39910. 

27 

39167. 

73 

37788. 

14 

36863. 

85 

36704. 

36 

IHV- 

N.K..  " 

4)0. 
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12.  Condemnation  Costs/100  Largest  Items 

This  report  presents  the  Master  Stock  Number  of  the  100  items  with  the 
largest  condemnation  cost.  This  report  provides  information  on  the  number  and 
type  of  items  that  cost  the  Air  Force  the  most  in  terms  of  condemnation  cost. 

A  sample  of  the  report  follows,  and  the  following  defines  the  nature  of 
the  information  presented  under  each  of  the  column  headings  of  this  report. 


Column 

Heading 

Description 

1 

MASTER  STOCK 

NUMBER 

This  column  shows  the 
Master  Stock  Number  of 
the  item  condemned. 

2 

TOTAL  COST 

This  column  shows  the 
total  condemnation  cost 
for  this  item. 

3 

NUMBER 

This  column  shows  the 

number  of  item  condemned. 
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EXHIBIT  21 


CONDEMNATION  COSTS  /100  LARGEST  ITEMS 


STNEDGT,  |Nt.  OVCDVIEU  NOOfl  MISSION  DFG6ADA1I0N  MODULE 
madcm  1982  caivedt  mocked  ip/i*/62 

t 

condemnation  costs/  100  labgest  items 


"•SIS*  STOCK  «0 

TOTAl  COST 

1 

5865901559266EO 

2065612. 

225 

2 

586500424444520 

955015. 

65 

S 

5865010*5695520 

690599. 

*1 

4 

586501044964520 

669595. 

46 

5 

5960010*04**220 

*52961. 

41 

* 

58659052I3544EO 

412256. 

62 

9 

596001 0404440EH 

285555. 

17 

a 

284000605 52 12 TO 

188805. 

71 

« 

586500*36025220 

196980. 

45 

10 

5 86500009 4 582 EM 

120022. 

28 

ii 

58650104562 54 EN 

15599*. 

9 

ti 

284001004180410 

1*9219. 

48 

is 

586500426444220 

155118. 

17 

14 

596001040444120 

154892. 

ii 

is 

284001050459918 

122855. 

2 

i« 

284001106980510 

95061. 

7 

12 

2840011169491TB 

85168. 

i 

t» 

1650011158256 

81908. 

28 

1* 

2840005952528TB 

2598*. 

1 

20 

586500259809920 

68999. 

9 

21 

586500002694920 

64121. 

14 

22 

586500009458120 

50598. 

5 

21 

2955010294052 

48946. 

20 

24 

S865000255292EO 

45948. 

12 

25 

58650022904S4EO 

*59*5. 

21 

20  586501048902920 

40895. 

1 

22 

58650000969452O 

59166. 

12 

20 

2855010592466 

55185. 

12 

2* 

6610001516221 

54261. 

9 

SO 

586501102015120 

55850. 

5 

SI 

586501 109822620 

29058. 

1 

52 

284001095895218 

264  20. 

1 

51 

284001 IT60922TB 

24624. 

2 

54 

1220010109119 

22150. 

0 

S* 

2995010489580 

21999. 

2 

SO 

5821010581095 

21115. 

2 

S2 

49200110815291/ 

19510. 

1 

SO 

2995006141284 

9 

SO 

58650105651 9220 

19001. 

5 

40 

586500249055420 

18149. 

1 

41 

28400106121 54TB 

19115. 

12 

42 

2840006055215TB 

16558. 

4 

45 

6125004499/98 

16024. 

6 

44 

58650104562602O 

15095. 

1 

45 

6685005209816TB 

14464. 

If 

40 

2855010151964 

14504. 

22 

47 

2955010481929TB 

15968. 

5 

40 

2840011159894TB 

15282. 

2 

4* 

2840010999121TB 

15185. 

1 

so 

165001062  9046 

12809. 

2 

SI 

6610001516692 

1  2554. 

f 

52 

5826010885650 

11484. 

2 

55 

5821006112449 

11226. 

5 

54 

2855010154806 

1106*. 

TO 

55 

2855010115218 

10888. 

5 

50 

28*001029982518 

10918. 

1 

52 

481001092 5506  IN 

10469. 

4 

54 

1 1600101504442/ 

inns*. 

I 

A  detailed  critical  parts  report  was  created  to  fully  identify  the  parts 
causing  the  aircraft  to  be  grounded.  This  report  contains  all  of  tne 
associated  variables  used  by  the  model  in  making  this  determination. 

The  report  contains: 

(a)  Day  of  failure 

(b)  Master  Stock  Number 

(c)  Initial  Inventory 

(d)  Parts  on  hand 

(e)  Failure  rate 

(f)  Base  condemnation  percent 

(g)  Depot  condemnation  percent 

(h)  Base  return  time  (m  days) 

(i)  Depot  return  time  (in  days) 

(j)  Percent  not  reparable  this  station. 

A  separate  FORTRAN  program  was  used  to  sort  the  original  master  ASO  file 
and  extract  the  desires  nomenclature  identifying  each  critical  spare. 


EXHIBIT  22 


CRITICAL  PARTS 

LIST! 

3AY  AASTER  STOCK  HO 

MIT  Mil 

POH 

FL  ROTE 

1  9898999404994994 

0. 

9. 

0. 

2  6615811749557 

0. 

368. 

8.000060 

3  6615010749957 

0. 

366. 

9.090060 

4  6615111749957 

0. 

365. 

9.000068 

5  5895119313832 

0. 

363. 

8.000692 

6  5895911313832 

0. 

361. 

0.000692 

7  5895!!  18313832 

0. 

359. 

9.000692 

9  5895119313832 

0. 

3y. 

9.000692 

9  5895811313832 

0. 

355. 

9.090692 

18  5895111313832 

0. 

353. 

9.008692 

11  5895018313832 

0. 

351. 

4.069692 

12  1631991645991 

8. 

348. 

0.017684 

13  1638881645991 

8. 

344. 

0.817604 

14  1630881645991 

6. 

341. 

4.817604 

15  1639981645991 

8. 

337, 

8.017684 

16  1638981645991 

8. 

334. 

9.017604 

17  1630881645991 

8. 

329. 

0.017604 

18  1638981645991 

8. 

324. 

9.017684 

19  1638881645991 

8. 

328. 

0.017604 

28  1638091645991 

8. 

315. 

4.617684 

21  1638981645991 

8. 

311. 

9.017604 

22  1630881645991 

8. 

386. 

6.017644 

23  1638001645991 

8. 

302. 

6.417604 

24  1638881645991 

8. 

297. 

0.017684 

25  1638881645991 

8. 

293. 

0.017684 

26  1638081645991 

8. 

288. 

0.017604 

27  1638881645991 

8. 

283. 

9.017604 

23  1638081645991 

8. 

278. 

0.017604 

29  1638681645991 

8. 

273. 

8.017604 

38  1638881645991 

8. 

268. 

0.017694 

31  1630981645991 

8. 

263. 

0.017604 

32  1638001645991 

3. 

259. 

0.417604 

33  1638081645991 

8. 

254. 

9.917604 

34  1638091645991 

8. 

251. 

6.017604 

35  1638891645991 

8. 

248. 

0.017604 

36  1630801645991 

8. 

244. 

0.017684 

37  1630081645991 

8. 

241. 

0.017684 

33  1638481645991 

8. 

238. 

0.017604 

39  1639941645991 

8. 

234. 

0.017604 

48  1630491645991 

8. 

231. 

0.017684 

41  1630191645991 

8. 

228. 

0.017604 

42  1630641645991 

8. 

224. 

9.017604 

43  1638081645991 

8. 

229. 

9.017684 

44  1639441645991 

8. 

217. 

0.917684 

45  1639441645991 

8. 

213. 

0.017604 

46  1638041645991 

8. 

209. 

9.917604 

47  1638041645991 

8. 

206. 

9.917684 

48  1630441645991 

8. 

202. 

6.017684 

49  1638041645991 

8. 

198. 

4.417684 

59  1638991645991 

8. 

195. 

9.617604 

51  1638991645991 

8. 

191. 

0.017604 

52  1638441645991 

8. 

188. 

0.917684 

53  1638901645991 

6. 

184. 

9.017684 

54  1638481645991 

8. 

181. 

4.017604 

55  1638481645991 

8. 

178. 

0.017604 

56  1638991645991 

8. 

175. 

0.0 17604 

37  1634441645991 

3. 

172. 

0.017694 

58  1638061645991 

8. 

169. 

0.017604 

59  1638881645991 

P. 

167. 

4.917604 

68  163*041643991 

<  i.  i< 

3. 

164. 

0.017684 

•M 

BC  7. 

DC 

BRT 

BRT 

ARTS 

0. 

9. 

0. 

9. 

0. 

9.80 

9. 

2. 

0. 

0. 

0.80 

0. 

2. 

0. 

0. 

0.88 

9. 

2. 

9. 

0. 

0. 

9.91 

20. 

180. 

0.03 

4. 

9.91 

20. 

180. 

0.03 

0. 

0.01 

20. 

180. 

0.83 

9. 

9.91 

20. 

130. 

0.03 

0. 

9.91 

20. 

180. 

0.03 

0. 

9.91 

29. 

180. 

0.93 

0. 

0.01 

20. 

180. 

0.03 

0. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

31. 

0.16 

0. 

IMS 

3. 

81. 

8.16 

0. 

9.46 

3. 

31. 

9.16 

0. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

31. 

0.16 

0. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

6.46 

3. 

81. 

9.16 

6. 

1.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

81. 

8.16 

0. 

9.46 

3. 

31. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

8.46 

3. 

81. 

0.16 

4. 

0.46 

3. 

SI. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

4.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

31. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

81. 

9.16 

0. 

0.46 

3. 

82. 

0.16 

0. 

9.46 

3. 

31. 

0.16 

0. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

4.46 

3. 

31. 

0.16 

0. 

9.46 

3. 

81. 

9.16 

9. 

0.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

9.46 

3. 

81. 

0.16 

9. 

9.46 

3. 

31. 

0.16 

9. 

9.46 

3. 

81. 

0.16 

0. 

8.46 

3. 

81. 

0.16 

0. 

0.46 

3. 

81. 

0.16 

9. 

t.  TO 

3. 

81. 

0.16 

i 

y  i 

,l 

1  |: 
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This  section  presents  examples  of  the  following  output  reports: 

Data  Control  Section 

Data  Processing  Section 

MSNs  tor  which  Peacetime  Usage 
Exceeds  Initial  Inventory 
Level 

Mission  Degradation  Report 
Mission  Degradation  Plots 
Data  Base  Listing  Report 


EXHIBIT  23 

DATA  CONTROL  SECTION 


C;:F  '.3 •' 

m 

MTU  CONTROL  SECTIONS 


ITEIf  LEUEL 


flWIH  LEM  TIE 
PROWCTIOH  LERI  TIE 


FACTOR  AIN 


9EAAA)  RATE 

1.01 

0. 

0 

ICR  X 

1.00 

0. 

1 

UNIT  REPAIR  TIE 

1.00 

0. 

0 

DEPOT  REPAIR  TIE 

1.00 

0. 

0 

UNIT  CONDOWflTION  l 

1.00 

1. 

0 

BEPOT  COHKNNATION  X 

1.00 

0. 

0 

UNIT  REPAIR  COST 

1.00 

0. 

0 

SERVICEABLE  PEACE 

1.00 

1. 

0 

SERVICEABLE  WAR 

1.00 

0. 

0 

UNSERUICEAEE  PEACE 

1.01 

0. 

0 

UNSERVICEABLE  MAR 

1.00 

1. 

1 

OR  ORDER  ASSETS 

1.00 

0. 

0 

ESSENTIALITY  LEUEL 

10.00 

0. 

0 

CANNIBALIZATION 

1.00 

0. 

0 

CRITICAL  ITEN  LIST 

100.00 

1. 

0 

CRITICAL  ITEN  SORT 

0. 

0. 

0 

OPTIONAL  REPORTS  REQUESTED: 

REPORT  11 

YES 

REPORT  12 

YES 

REPORT  13 

YES 

REPORT  14 

YES 

REPORT  15 

YES 

REPORT  16 

NO 

REPORT  17 

NO 

THESE  ADS  MILL  BE  USO  IN  THIS  RUN  OF  THE 

THESE  FSC  HILL  K  USO  IN  THIS  RUN  OF  THE 

EXHIBIT  24 


iriiti  iftsi  rKOttSsini  oLLiitin- 


suhhary  of  hastes  stock  huhber  select  ion: 


TOTAL  HSU’S  PROCESSa  in  DATA  BASE 
ASA’S  WITH  ESSEHTIALITY  LEVEL  >  THRU  10  = 
ASA’S  WITH  BEHAN  RATI  OF  ZERO 
ASA’S  HOT  APPLICABLE  TO  FSC  USE!  IH  THIS  RIM  = 

ASH’S  HOT  APPLICABLE  TO  ADS  USES  IH  THIS  RUH  = 

ASH’S  HOT  APPLICABLE  TO  RLC  USEB  IH  THIS  RUH  = 

ASH’S  HOT  APPLICABLE  TO  ASH  LIST  IH  THIS  RUH  = 

ASH’S  IH  ASH  LIST  BUT  HOT  IH  OVERVIEW  BATABAS£= 
TOTAL  USH’S  SELECTEB  FOR  THIS  RUH 


SYHERGY,  1HC.  OVERVIEW  NOBEL  AISSIOH  BEGRABATIOH  AOBVLE  REPORT  6  PAGE  1 
CAP  LOG-XXX  XX  BOH  ZIIKRHAH  03/(9/83  UMCLRSSIFIEB 


RUH  COHTROL  SECTIOH: 


YEAR 

PEACE  DAYS 
WAR  BAYS 


=  1981 
=  365 

=  120 


SY||HERGY,  INC.  OVERVIEW  AOBEL  AISSIOH  BEOIA1ATIOH  AOBULE  REPORT  6  PAGE  2 
CAP  LOG-XXX  XX  BOA  ZIAHERHHH  03/19/83  IMCLASSIFIEB 


FLYIAG  PROGRAM  FOR  1981: 

PEACETIME 
FLY  HRS/BAY 

EACH  WHOLE 
ABS  OACFT  FCFT  FLEET 


WftRTIAE  FLY  HRS/BAY 

l  2  3  4  5  6  7  8  9  II  11  12  13  14  15 
EACH  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30 
ACFT  31-45  46-61  61-90  -120  -ISO  -181 


EXHIBIT  25 


SYNER GY,  INC.  OVERVIEH  NODEL  HISSION  DEGRADATION  NOIULE  REPORT  11  PAGE  1 
COP  LOG-XXX  XX  DON  Z1WERNAN  03/99/83  UNCLRSSIFIO 

m  FOR  MUCH  THE  PENCE  THE  USAGE  EXCEEDS  INITIAL  INVENTORY  LEVEL 

LISTS  IIL  ,  TOTAL  PEACE  USAGE  ,  PEACE  COHJENNATIONS  ,  AM  PEACE  PIPELINE. 
RESULTING  IIL  DECREASED  IY  SOU 


SYNERGY,  INC.  OVERVIEH  NODEL  NISSIOH  DEGRADATION  NOIULE  REPORT  11  PAGE  2 
CAP  LOC-HOT  XX  ION  ZINHERHAH  03/09/83  UNCLASSIFIED 

YFAR=1981  ATTRITION  RATE  USE1:  1.0163  FOR  HIS:  XXXXX 


REQUIRED 
FLYING 
DAY  HOURS 


18  616. 

19  616. 


22  616. 

23  616. 

24  616. 

25  616. 


28  616. 

23  616. 


SORTIE  ■ 
LENGTH 

2.11 

2.11 

2.11 

2.11 

2.01 

2.01 

2.01 

2.00 

2.01 

2.00 

2.01 

2.00 

2.00 

2.00 

2.00 

2.01 

2.00 

2.00 

2.00 

2.10 

2.00 

2.11 

2.10 

2.00 

2.00 

2.01 

2.01 

2.00 

2.00 

2.11 

2.01 

2.00 

2.01 

2.00 

2.00 

2.00 

2.01 

2.00 

2.00 

2.01 

2.10 


SORTIE  RATE 

- ASSEHDLED 

FLEET  EACH  ACFT  AIRCRAFT 
287.  0.78  370. 

287.  0.78  368. 

287.  1.78  366. 

287.  0.79  365. 

287.  0.79  363. 

272.  0.75  361. 

272.  0.76  359. 

272.  0.76  357. 

272.  9.76  356. 

272.  0.77  354. 

303.  0.86  352. 

303.  0.87  350. 


lost  rones 

BY  UrffLYAJLE 

ATTRITION  AIRCRAFT 


woes  FLYADLE 
PERCENT  AIRCRAFT 


0.92  340. 
0.94  337. 
1.95  333. 
0.96  330. 


1.01  320. 
1.02  316. 
1.04  313. 
1.05  319. 
1.97  306. 
1.09  302. 


1.15  290. 
1.27  286. 
1.29  284. 
1.31  282. 
1.33  280. 
1.35  278. 
1.37  275. 
1.39  273. 
1.41  271. 
1.43  269. 
1.45  267. 
1.47  265. 


1.G7  334. 

2.26  329. 


12.97  234. 

13.55  231. 


PERCENT 

SORTIES 

FLOW 

191. 

101. 

100. 

100. 

101. 

100. 

100. 

100. 

100. 

101. 

100. 

100. 

100. 

100. 

100. 

100. 

100. 

108. 

100. 

101. 

100. 

108. 

110. 

110. 

110. 

100. 

100. 

100. 

100. 

110. 

100. 

100. 

110. 

191. 

100. 

190. 

100. 

100. 

too. 

110. 

100. 


HOURS  CW!  HOURS 
FLOW  FLOW 


574.  1722. 
574.  2296. 
574.  2870. 
543.  3413. 
543.  3956. 
543.  4499. 
543.  5842. 
543.  5585. 
605.  6190. 
605.  6795. 
605.  7480. 
605.  8005. 
605.  8610. 
616.  9226. 
616.  9842. 
616.  10458. 
616.  11074. 
616.  11691. 
616.  12306. 
616.  12922. 
616.  13538. 
616.  14154. 
616.  14770. 
616.  15386. 
616.  16002. 
616  16618. 
616.  17234. 
616.  17850. 
668.  18518. 
668.  19186. 
668.  19854. 
668.  20522. 
668.  21190. 
668.  21858. 
668.  22526. 
668.  23194. 
668.  23862. 
668.  24531. 
668.  25198. 


f'JKtiOl? 
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44 


444 


4444 


4444 


444 


444 


4444 


4444 


4444 


44444 


44444 
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444444 
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EXHIBIT  28 


•ENERGY,  INC.  OUERVIEH  NODEL  MISSION  DEGRADATION  NODULE  REPORT  15  PAGE  1 
:HF  LOG-XXX  XX  SON  ZIIKRNRH  93/19/83  UNCLASSIFIED 


NASTER  UNIT  ABNIH  PROI  BASE  DEPOT  ORDER  1ASE  WISE  DEPOT  ITEN  APPLICATIONS 


stock 
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UNIT 

COST 

REPAIR 

COST 

LEM 

TINE 

LEflJ  R 
TINE 

EPhIR  r 
TINE 

EPflIR 

Tilt 

SHIP  DENRNI 
TINE  RATE 

ARTS 

RATE 

CONI. 

PCNT 

CONI.  ESSEN.  STOCr- 
PCHT  CODE  LEUEL 

SYSTEM  AMOUNT 

1434UJ8I84464 

2539.89 

1189.94 

3 

21 

4 

81 

15  8.300012 

1.80 

4. 

0.92 

1  3 
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l 

A 
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24454.94 

3 

29 

22 

31 

15  0.008084 

0.29 

4. 

9.(6 

1  0 
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1 

w 
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5269.09 

2261.04 

5 

23 

8 

3 
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1.08 

9. 
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1  41 
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1 
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15 

9 

81 
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1 
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I .  Model  Results 


1 .  Baseline  Runs 

This  section  contains  the  results  of  the  effort  undertaken  to  develop  this 
Navy  prototype  capability  assessment  model.  Therefore  this  section  describes 
the  methodology  used  in  producing  the  model  results.  The  Mission  Degradation 
Module  was  run  under  various  scenarios  to  test  the  model's  ability  to  assess 
Navy  mission  capability  and  sustainability. 

The  model  was  exercised  using  UNCLASSIFIED  sample  Navy  wartime  and 
peacetime  flying  hour  programs  under  various  scenarios.  The  model  was  run  for 
wars  of  60  and  120  days  using  random  levels  of  serviceable,  unserviceable,  and 
on-order  assets  with  an  assumed  constant  order  and  ship  time  of  15  days.  In 
addition,  the  model  was  run  under  both  the  cannibalization  and  no 
cannibalization  options.  Immediately  following  is  a  brief  report  describing 
the  results  of  each  run  and  the  levels  of  cannibalization  necessary  to  achieve 
the  sortie  and  flying  hour  requirements.  Also  specified  are  the  expected 
mission  losses  if  a  no-cannibalization  assumption  is  imposed.  A  summary  of 
the  model  results  is  provided  in  Exhibit  III-1 .  It  is  important  to  note  that 
all  the  runs  described  below  were  made  using  the  prototype  600  spare  data 


Run  1 

The  model  was  run  under  a  scenario  of  365  days  of  peace  followed  by  a  60 
day  war  with  no  cannibalization.  The  model  predicts  mission  degradation  will 
begin  on  Day  31  and  rise  steadily  until  it  reaches  100  percent  on  Day  40  when 
there  are  zero  flyable  aircraft. 

Run  2 

The  results  of  Run  2  were  significantly  different  from  Run  1.  Again,  the 
model  was  exercised  under  a  scenario  of  365  days  of  peace  followed  by  a  60 
day  war,  under  the  full  cannibalization  option.  The  model  predicts  the  Navy's 
F-14As  will  be  able  to  accomplish  100  percent  of  their  mission  during  a  60  day 
war  with  full  cannibalization. 

Run  3 

Run  3  was  a  scenario  of  365  days  of  peace  followed  by  a  120-day  war  with 
no  cannibalization.  The  model  results  are  exactly  like  those  of  Run  1 .  The 
model  predicts  that  mission  degradation  will  begin  on  Day  31  and  rise  steadily 
until  it  reaches  100  percent  on  Day  40  when  there  are  zero  flyable  aircraft. 

Run  4 

Run  4,  while  similar  to  Run  2,  extends  the  analysis  beyond  Day  60.  Run  4 
was  made  under  a  scenario  of  365  days  of  peace  followed  by  a  120-day  war  with 
full  cannibalization.  The  model  predicts  the  F-14A  will  be  able  to  accomplish 
100  percent  of  its  missions  until  Day  67.  On  Day  67  mission  degradation 
begins  to  rise  steadily  until  it  reaches  a  maximum  where  only  65  percent  of 
the  required  sorties  will  be  able  to  be  flown. 
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EXHIBIT  29 


SUMMARY, 

F014A  MISSION  DEGRADATION 
BASELINE  RUNS 

DAYS  AT 

100* 

CAPABILITY 

DAY 

MISSION  DEGRADATION 

REACHES  A  MAXIMUM 

NMCS  % 

LAST  DAY 

OF  WAR 

30 

40  (100%) 

100% 

60 

60  (0%) 

28% 

30 

40  (100%) 

100% 

66 


120  (59%) 


73% 


2.  Sensitivity  Analysis 

The  purpose  of  the  sensitivity  analysis  runs  was  to  test  the  susceptibilty 
of  the  Mission  Degradation  Module  to  changes  in  flying  hour  requirements  and 
sensitivity  parameters  such  as  inventory  levels. 

The  methodology  used  to  make  these  runs  was  similar  to  the  baseline  run 
methodology  with  the  exception  that  the  only  changes  made  were  either  to 
flying  hour  requirements  or  to  the  inventory  levels.  The  scenario  was  365 
days  of  peace  followed  by  a  120  day  war  using  serviceable,  unserviceable  and 
on-order  assets  for  both  the  cannibalization  and  no  cannibalization  options. 
Immediately  following  is  a  brief  report  describing  the  results  of  each  of  the 
sensitivity  analysis  runs. 

Run  5 

Run  5  was  run  with  a  20  percent  increase  in  the  inventory  level  with  all 
the  other  parameters  remaining  constant  under  the  no  cannibalization  option. 
The  model  predicts  that  100  percent  of  the  required  mission  can  be  flown  until 
Day  31  when  mission  degradation  begins.  This  is  a  similar  result  as  the 
baseline  case.  The  only  difference  is  the  model  predicts  that  a  20  percent 
increase  in  assets  will  reduce  the  extent  of  mission  degradation  by  13 
percent. 

Run  6 

Run  6  was  also  run  with  a  20  percent  increase  in  inventory  levels  holding 
all  other  parameters  constant  but  under  the  full  cannibalization  options.  The 
model  predicts  that  100  percent  of  the  required  missions  can  be  flown  until 
Day  31  when  mission  degradation  begins.  The  model  predicts  that  a  20  percent 
increase  in  inventory  levels  combined  with  full  cannibalization  will  give 
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an  increase  of  one  day  or  1  percent  in  capability  at  100  percent  of  the 
required  missions  flown  over  the  baseline  case. 

Run  7 

Run  7  was  run  with  a  decrease  of  20  percent  in  inventory  levels  without 
cannibalization  and  holding  all  other  parameters  constant.  The  model  predicts 
that  100  percent  of  the  required  mission  can  be  flown  until  Day  29.  A  loss  of 
one  day  or  4  percent  capability  at  100  percent  of  required  missions  flown 
compared  to  the  baseline  case. 

Run  8 

Run  8  was  also  run  with  a  20  percent  decrease  in  inventory  levels  but 
under  the  full  cannibalization  option.  The  model  predicts  that  100  percent  of 
the  required  missions  can  be  flown  until  Day  72  when  mission  degradation  sets 
in.  This  is  the  exact  same  result  as  the  baseline  case  which  is  not 
surprising  because  the  cannibalization  option  compensates  tor  this  loss  in 
assets.  The  model  does  predict  that  if  assets  by  are  decreased  by  20  percent 
and  cannibalize  aircraft,  the  F-14A  will  only  experience  a  loss  of  1  percent 
capability  compared  to  the  baseline  case. 

Run  9 

Run  9  was  run  with  a  20  percent  increase  in  flying  hour  requirements 
without  cannibalization.  The  model  predicts  that  100  percent  of  the  required 
missions  can  be  flown  until  Day  26  when  mission  degradation  sets  in.  This  is 
a  loss  of  5  days  or  17  percent  in  capability  at  100  percent  required  missions 
flown  when  compared  to  the  baseline  case. 
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Run  10 


Run  10  was  also  run  with  a  20  percent  increase  in  the  flying  hour 
requirement  but  under  the  cannibalization  option.  The  model  predicts  that  100 
percent  of  the  required  flying  hours  can  be  flown  until  Day  61  when  mission 
degradation  begins.  This  is  a  loss  of  11  days  or  15  percent  capability  at  100 
percent  required  missions  flown  when  compared  to  the  baseline  case . 

The  results  of  this  analysis  suggest  that  the  model  is  sufficiently 
sensitive  to  changes  in  flying  hour  requirements  and  inventory  levels  to  give 
us  confidence  in  the  model's  ability  to  perform  comparative  static  analysis 
under  various  Navy  scenarios. 
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MICROCOPY  RESOLUTION  TEST  CHART 

NATIONAL  BUREAU  OF  STANDARDS-  1%3-A 


EXHIBIT  30 


SUMMARY ,  F014A  MISSION  DEGRADATION 
SENSITIVITY  ANALYSIS  RUNS 


RUN  « 

DAYS  AT 

100% 

CAPABILTY 

DAY  MISSION 

DEGRADATION  REACHES 

A  MAXIMUM 

NMCS% 

DAY  120 

• 

5 

30 

42 

(100%) 

100% 

6 

72 

120 

(58%) 

72.7% 

7 

29 

37 

(100%) 

100% 

• 

8 

71 

120 

(58%) 

73.3% 

9 

25 

34 

( 100%) 

100% 

10 

60 

120 

(67%) 

75.  1% 

• 
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3 .  Logistics  Capability  Assessment  Charts 

Logistics  capabiiity  assessment  charts  can  be  derived  from  the  results  of 
the  Mission  Degradation  Module.  Exhibit  III-3  is  an  unclassified  F-14A 
prototype  capability  assessment  chart  based  on  the  information  provided  by  the 
Mission  Degradation  Analysis  Report  (Report  11). 

Part  1  of  the  Mission  Degradation  Analysis  Report  gives  the  analyst 
day-by-day  flying  hour  information  which  gives  insights  into  the  size  and  the 
shape  of  the  required  flying  hour  curve.  In  addition,  Part  1  of  the  Mission 
Degradation  Analysis  Report  shows  day-by-day  the  actual  hours  the  model 
predicts  will  be  flown. 

These  two  pieces  of  information,  the  required  flying  hour  curve  and  the 
predicted  actual  hours  flown  curve,  form  the  logistic  capability  assessment 
chart.  This  prototype  logistics  capability  assessment  chart  shows  the 
estimated  mission  capability  and  sustainability  based  on  reparable  spare  parts 
availability.  While  the  model  at  present  only  shows  capability  based  on  spare 
parts  availability,  it  can  be  modified  to  show  balanced  capabilities  based  on 
the  availability  of  other  assets  such  as  munitions  and  fuel. 


EXHIBIT  31 


Days  of  Conflict 


.  Exercising  the  CAPLOG  Model  on  the  New  Data  Base 


The  model  was  exercised  for  a  variety  of  scenarios  and  F-14  fleet  sizes 
under  varying  assumptions  of  maximum  turn  rates,  repair  times  and 
cannibalization  options.  In  all,  almost  fifty  model  runs  were  made  using 
various  combinations  of  the  following  parameters: 


Scenarios: 

Fleet  Sizes: 

Max  Turn  Rates: 
Cannibalization: 
Repair  Times: 


Peacetime,  simulate  SWA,  simulate  NATO 
300  AC;  340  AC;  400  AC 
1.0,  1.5;  2.0;  2.5 

Full,  None 

Reduced  50%,  Actual,  Increased  50% 


These  outputs  of  the  selected  model  runs  are  available  on  file.  The  most 
interesting  set  of  runs  consisted  of  the  eight  runs  for  the  simulated  NATO 
scenario  consisting  of  the  eight  combinations  of  parameters  given  by: 

Fleet  Size:  340  AC,  400  AC 

Max  Turn  Rate:  1.5,  2.0 

Cannibalization:  Full,  None 


The  results  of  these  eight  model  runs  were  summarized  in  graphic  form  to 
portray  the  capability  estimates  relative  to  the  requirement  m  a  single 
chart.  These  results  are  displayed  in  Exhibit  32. 


CAPLOG  CAPABILITY  ASSESSMENTS 


Days  of  Conflict 


The  worst  and  best  cases  of  these  eight  runs  defined  the  pessimistic  and 
optimistic  extremes  which  were  used  to  portray  an  estimated  capability  band 
relative  to  the  requirement.  This  capability  band  was  presented  in  a  briefing 
to  display  representative  current  F-14  capability  as  estimated  by  CAPLOG.  The 
entire  briefing  which  contains  this  result  is  included  in  this  report.  The 
briefing  slides  are  self-explanatory  and  are  therefore  presented  without 
comment  or  text. 
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BRIEFING 
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Data  Base  Improvements  Important 


EXTENSIONS 


’CANNIBAL’  MISSION  DEGRADATION  v: 


c 


:  r.^r-ion: 


:  :T^'JS: 

r 

:  L^G'jRQE: 

r 

:  DECISION! 

:  SUBROUTINES: 

C  1CT[: 

r 

C  E  NERGY  LABEL: 

f 

l  .a$T  UPDATE: 


THIS  PROGRAM  EVALUATES  THE  RELATIONSHIP  BETWEEN 
INVENTORY  INVESTHENTS  AM  MISSION  CAPABILITIES. 
IT  CALCULATES  THE  NUMBER  Of  AIRCRAFT  AVAILABLE 
FOR  MISSIONS  AND  NUMBER  Of  ASSEMBLE!  AIRCRAFT  AS 
A  FUNCTION  Of  TIME. 

MAIN  PROGRAM 

FORTRAN  IV 

SINGLE 

SETUP,  INPUT,  FLYHRS,  ATTRAT,  PLOTPT 
PACE,  PESOPT,  HAROPT,  CRTSPR,  REPT17 

SEE  DOCUMENTATION  FOR  EXPLANATION  Of  VARIABLES. 

LA61A/F0RTRAN/CANMIBAL 


DOUBLE  PRECISION  NAH£1,HANE2 
DIMENSION  ATRRTEU48,3),NRXHISU4i,3),NAXACIl4l,3) 
DIMENSION  HTTRmi4l,3),NPAC(3U),CANNIB(3S(),PNr(36G) 
DIIOSION  AVUCU4I,3),NISFLNU4I,3),NH154I,IP01NT(18I) 
DIMENSION  PARTSIH 54 ) , LISTU86 J ,  IOOTC i H ,  TflBLEUC  10 1 
DIMENSION  BASRET(3611,BEPRET(361),!KSi3(l) 

DIMENSION  NSHC(3,3),IDAYC(54I,ACHISS(36S).H0URS(3U) 
DIICNSION  PLOTINt !44«l,l«Kl4),HRNEU4,4i,NANE2l4,4J 
DIMENSION  HIPT(54),RQ..TS(  141  ),CAPABL(  14(1 
ll*"  „  4HSIt!(4, 181  ),CRLIST(8, 181 ) 


REAL  HfiXNIS.HRXAC,NPAC,HISFLN,NN,NNCS 
LOGICAL  FIRSTI,PEAC0N,VAR1EH,VARCAN, CRITIC, ENDf  LG,  CANBAL 
LOGICAL  FU1G11,FLAG12,FLAG13,FLHG14,FLAG15,FLAG16,FLAG17 
LOGICAL  PACING 

CONNOM  /fIXPLT/  PLTSHT,VALHIUBI,VRLLO(II) 

CONNON  /N1SBEG/  AR154),HRSBNI54),SL(54) 

CG!TN  BLOOA/  HrHBN(3,3Sl,IPFHB'fl2DBI,NUNAC(21B) 

COHMON  /BLOCH/  ITR,jyR,TFH,PFH,lHO'JRS(36),AD,XBS,HIIS,ABI,HJI, 

i  APRl,BREPRP,BCONF,3REPRN,BCflHBN,BREPRP,BCQNBP, 

i  NEPRN.DCONIN 

COMMON  'H.OCXC/  MSm4),COST,lALT,IPLT,IOST,lP,BP,BCP,DCP,ON!CP, 

*  0N1CP,FR,URC0ST,1BRT,I3RT,IIL,IILS,1ILU,1IL0, 

i  NEHARI  1I),IQPA(2DI) 

C 

C  lQARtl)  s  AY 

C  NEHAR12)  -  BY 

C  NEWS!  3)  1  EY 

C  NEHARI 4)  =  MEAN  FAILURE  RATE 

C  NEHARI5)  =  STANDAR!  DEVIATION  Of  FAILURE  RATE 


1, 

— . . .  -  .  , 

CO-NGH 

/BLOCtf/  FLAGll,FLRG12,FLAG13,FLM4.nj)Gl5,FL8Gl6,FLAG17 

COMMON 

/ILOCKG/  0ELTA(40l,RKIH(48),RHffr.i4iP 

cohhoh 

/BLOCXH/  JYERRS, IYEARSl 9 ) , JPSflTS ( ? ) , .UBftYSI 9 ) , JBUBGK  9 ) 

C''"M 

/ILOCXL/  1111, 70), L2(70I,L3(7I), LIMBS, LL£NTH,LFREE 

:  m 

/BLflttH/  MI 4,209  ),H2I299 ),lt3(2f 9 ). WORBS.NLDfTH, NFREE 

1 

JNNON 

/Him/  LSTFSCI 200 ) .LSTRBSl 200 ), LSTALC1 5 ),HBXREF (70,20), 

■ 

l 

IFXREF (50,20), JCmiNT , KCOUNT . LCOUHT, NCOUHT , 

i 

NUNHIS,  ffllHFSC ,  NDWILC,  JKOUNT  i  SO ) ,  UCOUNT  ( 70 1 

c 

equivalence  (usTim.Hsm 

1 

l 

W)TA 

IDflYC  /  54«361/ 

■» 

■ 

BATA 

ROOTS/  140*0.0/  CAPABL/  110*1.0/ 

DATA 

TAILEU  /’  A* , ’ ft-»* , *  ft-C’ , ’ fl-3  * , *  ft-E’  f 

i 

'A-F’/B-G’.’A-H’.’A-l’.’A-JV 

DATA 

CffilBAL  /  .FALSE./ 

DATA 

VA8CA0  /  .FALSE./ 

r* 

DATA 

CRITIC  /  .FALSE./ 

ti 

BATA 

VARIED  /  .FALSE./ 

1 

DATA 

PEACON  /  .FALSE./ 

DATA 

PACING/. TRUE./ 

DATA 

HZERO  /  0/ 

DATA 

IPOINT  /  1,  2,  3,  4,  5,  6,  7,  8.  MO,  11, 12, 13, 14, 15, 

i 

16, 17, 18, 19, 20, 21, 22, c3.24, 25, 26, 27, 28, 29, 30, 

■ 

9 

i 

15*31, 15*32, 30*33,30*34. 2?*35, 30*36/ 

*» 

BATA 

HARK  /lH*,lH.,lHt,lHX/ 

DATA 

NAOE1  /* CfltlUl' , * M.1ZO* , '  R!RCR','AFT 

i 

’FLYABL’j’E  AIRC’/RAF f  ’, 

i 

’ASSEHI’,’LEB  Al’,’RCPA<T,’  ’, 

u 

i 

’PERCEN’,’T  KISS’,’I0HS  F’,’LQI«1  »/ 

a 

BATA 

KAHE2  /’HISSIQ’,’0  KQU’,’IRE!0’,'TS  ’, 

-> 

l 

’HISSI0’,'HS  ACC’, ’OHMS', ’HEB  ', 

9  9  1  »  J  »  9  » 

r_ 

I 

1 

»  »  *  * 

’  7  ’/ 

INITIALIZE  IICTIOHMIES  Mil  HOIK  FILE. 


DC  19001  1=1,210 
NUHAC(I)=0 
comimjE 


CALL  SETUP!. FALSE.) 

CALL  IHPUNNVHHSKI 
NHORBS=«UHODS  ♦  32 
II  =1 
10  =2 

N  2  1=1,  HUMS 
IPT=LSTHISU) 

n  l  J=i,7i 

BO  l  1=1,20 

IF(HDXREF(J,K).EQ.IPT)  GO  TO  3 

continue 

IUPTIIN 

CONTINUE 

SET  UP  RAMSON  DISK  FILE 


CALL  RAHSIZ! 25, 140,1 
•ALL  RAHSIZ!26,I40,) 
!r':LAGl4)WITEI  14,814) 
!R  =0 
!•'?  =IYR  ♦  1 


114 


IPBf)YS=JPBflYS(  IY8) 

1MWYS=JM»YS(  IYRJ 
JYR  =IYEf)RS(  IYS) 
IBUDGKJDUDGTUYR) 

IFUHlftYS  .Cl.  128)IHDAYS=128 
IFIIYR  .[Q.  JYCfKS )EH9FLC=. TRUE. 
CALL  PAGE! 16) 

WITEI  86,871)  JYR,  IPDflYS, IHDAYS 
H0RYS  =IHIftYS 

CALL  FLYHRSt .  TRUE. ,  IPDAYS, IHDAYS ) 


CALCULATE  PARANETERS  FROH  bath  cwirol  section 

DELTfl(26)=HER0ICS  FRACTION 

DELTA! 24 )=DATTLE  DANAGE  RECOUERY  FRflaiON 

DELTA! 23 )=PEACE  TINE  CONKNNATION  FRACTION 

DELTAI21KRITICAL  PART  LIST  SWITCH 

DELTAl2l)=€AIt1IRALlZAT10H  FRACTION 

KLTAI27)=UARIADLE  1ENAND  RATES  FOR  SELECTE1  PARTS 

DELTA! 31)=PL0T  SCALE  FIXING  UARIADLE 

DELTA! 32)=AGGREGRTING  UP  TO  ND  LEVEL 

DELTA! 33 l=OUTPUTT  ING  FLYING  HOURS  FOR  PLOTTING 

DELIA!  34  )=NWID£R  OF  AIRCRflFT  NULTIPLIER 

DELTA!  35  NNUENTQRY  LEVEL  NULTIPLIER 


CONVERT  PERCENTAGES  TO  FRACTIONS 

DELTA! 211-DELTA! 21)  /  108. 

DELTA123I-DELTR123)  /  100. 

DELTA(24)=DELTA124)  /  100. 

DELTR!25)=DELTRI25)  i  100. 

DELTA! 26 I=1ELTR(2&)  /  100. 

DELTR(34)=IELTA(34)  /  100. 

DELTA! 351=DELTA! 351  /  100. 

CHECK  NULTIPLIER/REJUCER  FOR  IMBER  OF  AIRCRAFT 
AND  HINDER  OF  PARTS  (IKITlflL  INVENTORY) 

IF! DELTA! 341.11.0.0 1  DELTA(34)=1.8 
IF(DELTA(35).LE.0.0)  DELTA(35M.D 

FLTSHT=DELTA(31) 

COHJERT  HEROICS  FRACTION  TO  THE  RESULT!'*,  EDUCED  REPAIR 
FRACTION. 

DELTA!  26IM.-DELTA!  26) 

CONVERT  PEACE  TII€  CONDEMNATION  FRACTION  TO  TRACTION  X 
HINDER  X  DAYS  IN  PEACE  TINE  YEAR  SCENARIO 

?AYS=3«.iDELTA(23)iIYR 
IFtDAYS.GT.O.)  PEBCON=.TRUE. 

CHANGE  ATTRITION  REDUCTION! DATTLE  DANACE  REDUCTION)  TO 
RESULTING  REDUCED  ATTRITION 

IDR=1. -DELTA!  24) 

!F(DELTR(21).GT.0i  CR1TIC=.TPUE. 

IF(DELTA(27).GT.fl)  URRDE1N.TRUE. 

!F(DELTA!20).GT.O.)  CANDAL=.TRUE. 
F(CANDAL.AN1.DELTA(20).LT.1.I)  VflRCPN-  .  115 


CALCULATE  ATTRITION  RATE  AND  JOHN  TINE  1Y  NBS 


CALL  ATTRAT1ATTRIT) 

IFfDELIfM 321. 11.0.3)  GO  TO  6 
C 

C  INITIALIZE  USX  FILES  TO  ZERO 
C  USX  FILES  HOLB  N1  RGREGBTIONS 

C 

50  4  1=1,  M 
RQHTSIIN. 

CAPABL(I)=0.0 

4  CONTINUE 
DO  5  1=1,71 

WRITE(25’I)  RUNTS 
HRITElcSM)  CAPABL 

5  CONTINUE 

6  CONTINUE 

C - 

C  WRITE  (CABER  ON  REPORT  06 

C  GENERATE  DAILY  FLYING  HOURS  REQUIRO  FOR  EACH  MBS 

C  INITIALIZE  HRXNIS,ATTR1T 

C  INITN8.IZE  AVLAC,CAHHIB,PHF,NPAC,NAXAC 


u — 

C 

HfiXHIS 

NAXINUH  NISSIONS  AUAILADLE  BASED  ON  FH  AND  SORTIE  LENGTH 

c 

NAXAC 

NRXINUN  A/C  AUAILABLE  AFTER  ATTRITION 

C 

RVLAC 

NUNBER  OF  A/C  WITH  PARIS  AUAILABLE  FOR  NISSIONS 

c 

BASSET 

BASE  RETURNS  TO  INVENTORY 

c 

DEPRET 

BEPOT  RETURNS  TO  INUEHTORY 

c 

POH 

PARTS  ON  HRBO-CURREHT  INUEHTORY 

c 

ATTRIT 

ATTRITION  BASES  ON  HfiXHIS 

c 

NPAC 

NISSIONS  PER  AIRCRAFT  BfiSQ  ON  RVLAC  AHI  NAXH1S 

c 

CAHHIB 

B/C  CAHHAIALIZEJ  IE, NOT  ATTRITEB  B'JT  WITHOUT  PARTS 

c 

FNF 

PERCENT  NISSIONS  FIOHN  1BSEJ  ON  A'JLAC  RN1  HfiXHIS 

c 

IPFHDY 

FLEET  PEACE  TINE  FLYING  HOURS  PER  W 

c 

NUNAC 

NUNBER  OF  AIRCRAFT  AVAILABLE 

c 

SL 

SORTIE  LENGTH 

c 

NN 

NAXINUH  NISSIONS  PER  AIRCRAFT  ;ER  BAY 

c 

r — 

T*N!S 

NRXINUN  NISSIONS  PER  FLEET  PEP  BAY 

M)  40  JM,HUHNJS 

JJ  =LSTNBSU) 

C 

C  INFLATE/DEFIATE  NUNBER  OF  AIRCRAFT 

C 

NUNAC1  JJ)=NUNACI  JJ  UBELTRI 34 ) 

C 

C  COMPUTE  NAXINUH  SORTIES  POSSIBLE  PER  JAY  PER  AIRCRAFT 
C  IASED  ON  24  HOUR  IAY,IOHH  TINE,  RHP  SORTIE  LENGTH 

C 

HH  IJ)=I24.0  -  HRSIN(J))  /  SLIJI 
C 

C  SET  UPPER  LIBIT  OH  FlYABLE  RIRCRRFT 
C 

NAXAC  ll,J)=NUNAC(JJ) 

AULAC(1,J)=NUHAC(JJ) 

10  35  !=1,NDAYS 

HXTBRY=I  ♦  1  116 

INDEX  =IPOINT(I) 


I 


1 


*»v 


C  CONFUTE  SORTIES  REQUIREl  IRSE1  OH  FLYING  REQUIREMENTS 
C  Mil  SORTIE  LENGTH 

C 

WKHISt I, J l=FLOflT( IHFHWT JJt IlflEX ) )  '  SUJ) 

DAIS  =tltt(J)  1  HAXACII,J> 

c 

C  IWXIHUII  SORTIES  POSSIBLE  IS  HIHIHUH  OF  THE  PER  AIRCRAFT 
C  RESTRICTIONS  OR  FLYING  PROGRAM  REQUIREMENTS 

C 

ir(HHXHIS(I,JI  .LT.  MIST  AHIS=«AXNfSf I,J) 

C 

C  ATTRITION  RATE  IS  COMPUTE!  FOR  LATER  USE  BY  11UIDING 

C  IMIKR  OF  ATTRITE1  A/C  (FROM  ATTRAT  SUBPOUT1HE)  BY 

C  NUMBERS  Of  SORTIES  TO  GET  ATTRITION  PER  SORTIE. 

C 

ATRATE(I,JNTTRIT(I,J)/ANIS 

C 

C  IF  PROUD!  COMPUTING  MIS  THEM  SET  ATTRITION  RATE  TO 
C  PREVIOUS  VALUE 

C 

IFIAMIS.IE.I.)  ATRATEI I ,  J  I=ATRATE(  H ,  J I 
HISfUHl,  JI=»IS 
C 

C  UPPER  LIMIT  OH  FIYAB1  AIRCRAFT  IS  PREVIOUS  DAY  MUMMERS 
C  MINUS  PREVIOUS  BAY  ATTRITION 

C 

MAXACUBT1«Y,JI=IM(AC(I,J)  -  ATTR1T(I,J) 
IF(MRXAC(MXTSTY,J)  .LT.  1.1  MWXflCtNXTBflY, J)=#.0 
C 

C  THIS  IS  VARIABI  UPPER  LIBIT  OH  FLYHJLI  R/C  INIT1AL1ZEB 
C  HITH  INITIAL  NUHIERS  OF  A/C  ANI  BTTRIT10M.HEAHIHGnJL 
C  ONLY  FOR  FIRST  JAY 
C 

AVLAC(IKTlIfiY,JI=FLOAT(MUNAC(JJH  -  RTTRITII, J) 

35  COHTIMUE 

C  HRITEU 1,3511)  (RTRATE(I,J),ATTRIT(I,J),I=1,NBRYS,17) 

3511  F0RNATU8F7.3) 

41  CONTINUE 
CALL  PAGE(ll) 
fllTEI 11,563) 

563  FORMAT!’  MSNS  FOR  WHICH  THE  PEACE  Tllf  USAGE  EXCEEDS  INITIAL’, 

1  ’  INVENTORY  LEVEL’,/,’  LISTS  IIL  ,  TOTAL  PEACE  USAGE  ,’, 
t  ’  PEACE  COHJEMATIONS  ,  (Ml  PEACE  PIPELINE. ’,/,UX, 

3  ’RESULTING  IIL  IECREASE1  IY  50?’) 

CALL  PAGE!  16) 

Ifi CRITIC)  HRITE(6,562) 

562  FORHATt’JNSN  OF  THE  FIRST  PART  CAUSING  FOLLOWING  NOS  TO  HRUE’, 

1  ’  ZERO  FLYABI  AIRCRAFT  ON  THAT  GIVEH  BAY',//, 

1  '  MSN  DAY  HIS’) 

c - 

C  MAIN  LOOP  Of  PROGRAM 
C  READ  TEMPORARY  Fill  USO  FOR  BIFFEREHT  YEARS 

C - 

REWIND  II 
NUMPTS=# 

50  REAB(ll,Eira)(LlSTUI),lM,NM)RlS) 

C 

C  IlflATE'DEFlATE  INITIAL  INVENTORY  LEVE! 
r 

IIL=I1L*DELTB(35)  1 17 


WNPTSMWffTSM 

1F(  DELTA!  27I.EQ.0)  GO  10  51011 
IFIKLTRIZn.CT.Il  GO  TO  50010 
F0l=fR-l.E-6*BGLTRO27)«SqRT(I.E+W81 
GO  TO  50901 

50010  !F(!fHflR(4).LI.99999.fflll.liDlfl8l51.LT.W9R) 
i  FR=NEHARl 4 1+1ELTAI  27  UHEHARl  5 ) 

FR=I.E-S*FR 
5*001  CONTINUE 

C - 

C  LOOK  TO  SEE  IF  THIS  PART  NEEDS  TO  IE  PURCHASED  TO  INCREASE 
C  INITIAL  INUEHTORY  LE'OEL 

C - 

c 

C  COMPUTE  BASE  AW)  DEPOT  REPAIR  FRACTIOUS  AND  CONDEMNATION 
C  FRACTION 

C 

BASPCHl.  -  KPJ  i  (1.  -  JP) 

KPPCT=(1.  -  KP)  «  IP 
COHPCT=t  .f-WSPCT-DEPPCT 

C - 

C  COMPUTE  KPQT  Mil  WSE  REPAIR  TINES  BASES  CN  HEROIC  FRRCTION 
C  AM  REPAIR  TINE  FRACTIOUS  FROA  PARANETERS 

DRTI=IJRT«BELTfl<261 

IRTI-IlPTilElTAlEO) 

1BRT-BRTI 
IBRT=BRTI 
TFAIL  =0. 

TTBftS  =0. 

TTDEP  =1. 

TTCND  =0. 

IPTS  =0 

BO  51  J-1,1WNHK 

51  IPTS  =IPTS  ♦  IQPR(J)  «  ININAC(LSTHBSiJl) 

BBF  =FR  *  IflSPCT 

DDP  =FR  *  3EPPCT 

C - 

C  CONPUTE  USE  AM  IEPOT  RETURNS  TO  IIWENfOFY  FRON  PEACE!  INE 

C - 

BO  51001  >1,361 

1ASRETUN.0 
IEPRET(J)=0.0 
51**1  CONTINUE 

C 

PECFAL=0. 

PP=0. 

30  54  J=l,NUmS 

X  =IPFHJY!LSTHJSUH  *  IQPAIJ) 

C - 

C  ACCUHULATE  TOTAL  PEACE  TINE  PART  FLYING  HOURS 

C - 

IF(K  .Efl.  OIGO  TO  54 

X  =X  i  DBP 

Y  =X  i  OOP 

PECFAL  =  PECFAL  ♦  JCPtf  +  DCPiY 
PP  *  IWTiX  ♦  IORTiY 
JO  52  I=l,IBRT 

IASRETII)=IHSRET(I!  ♦  X 

52  CONTINUE  118 


DO  53  1=1, IDRT 

XPRETt  I  )=BtPREH  I )  ♦  Y 

53  CONTINUE 

54  CONTINUE 

C - 

C  CALCULATE  INITIAL  PORTS  OH  HAND 

C  1FTS  IS  IM  TINES  PARTS  PER  ft/C  TO  GET  TOTAL  PARTS  AVRILA1LE 
C  FOR  CANHIIALIZIHG 

C - 

POH  =  III 

inCAHBADPOH  =IIL  *•  IPTS 

C«=— '■  ,i,  = - =================== - - 

C  SUBTRACT  OFF  PEACE  TINE  CONIEHtWTIONS 

C - 

IF(.HOT.PEACOA)  GO  TO  542 
TPF  =  PECf  MBflYS 
C 

C  PRIHT  MESSAGE  IF  STARTING  UMl  IN  THE  HOLE 
C 

IFtTPf.GT.  POH!  KITE<11,541)  MSH,POH,TPF,PECFAL,PP 

541  FORMAT! IX, 304, A3, 4F It.  1) 

APPLY  A  CORRECTION  TO  HRtCE  SURE  YOU  BOHT  RUN  OUT  BEFORE  DAY  1 

IF( TPF.CT.  POH)  TPF=t.5iP0H 
POH  =  POH  -  TPF 

542  IF(POH.LT.t.)  POH=0. 

IF(CAHBAL)  GO  TO  549 

C 

C  FOR  MON-CAHHIDALIZATIOH  OPTION,  SET  TOTAL  PARTS  TO 
C  INITIAL  INVENTORY  PARTS  ,  SET  FIRST  TINT  SWITCH  ,  HHB 

C  INITIALIZE  EACH  HJS’S  SPARE  PARTS  BUCKET  TO  ZERO. 

C 

PARTS  =PQH 
FIRST I-. TRUE. 

LASTHIN 

10  543  IM.HUHHDS 

543  PARISH! I )=t 

549  CONTINUE 

C - 

C  LOOP  FOR  HUHIER  OF  DAYS  DURATION 

C - 

DO  67  H.HBAYS 
NXTJAY=I  ♦  l 
INDEX  =IPOINTI I ) 

IIBRT  =1  ♦  IBRT 
IIDRT  =1  ♦  IDRT 
IFtIIBRT.GT.361)  IIB8T=361 
IFIIIBRT.GT.361)  IIDRT=361 
BfiSRETI I1BRT)=0.0 
DEPRETUIBRTN.B 
TT3AS  =TTBAS  +  BASSET! I) 

TTIEP  =TTBEP  ♦  lEPRET(I) 

C - 

C  ADD  RETUtmS-TO-INUENTORY  (THOSE  RETURNING  OH  THIS  DAY 
C  FROA  IBRT  OR  IDRT  DAYS  AGO 

C - 

PARTS=POH  ♦  DASRETII)  ♦  DEPREHI' 

C 

C  !K  OPTION  SAVE  RETURNS  TO  INVENTORY  r0R  HIS  DAY 


IF(.NQT.CRHBAl)  flDDIft=  BflSttK I)+DEPPETI I >  , 

10  66  J=lf  NUNHBS 

IF(IQPfl(J)  ,L£.  (I)GO  TO  66 
OPA  -IQPfl(J) 

IF(CAHFAL)  GO  TO  5499 
C 

C  CONSULT  IKOGTfiTION  FOR  EXPLAHAT10N  OF  FOLLOHIHG 
C  CODE  WEREIH  EACH  KBS  GETS  ITS  PORTS  BUCKET  SET  UP  FOR 

C  EOCH  DRY  BASED  ON  PREVIOUS  STATUS  OF  BUCKET  ONI  STATUS  OF 

C  BUCKET  OF  LOST  HIS  PROCESSED 
C  TABLE  IH  DOCUIOTATION  IS  FOU.OHEJ 
C 

IFIFIRSTI)  SO  TO  54981 

IF(PARTSHILASTH1)).LE.8.AH1. PARISH!  Jl.LE.I)  GO  TO  5498  • 

IF(PARTSHU).LE.B)  GO  TO  549? 

IF(P(ffiTSH(LASTNB).LE.O  I  PARISH! J)=§. 

IF(PARTSHILASTHI).GT.I)  PARTSHI J)=PARTSHILBSTHD) 

GO  TO  5498 

5497  PTSTSHI  JI=PARTSI4(  J  WARTSH!  LASTHI 1 

5498  PARTS--PARTSHIJI  • 

C 

C  USE  RETURNS  FROM  INUENTORY  ONLY  ONCE  THE  FIRST  TINE 
C  THRU  THE  LOOP 

C 

54981  IFIAB9IH.GT.I.1  PARTS=PARTS+A1IIH 

IFIHB1IH.GT.U  RDSIH=1.  • 

C  IF(I.LE.5.ANB.NUHPTS.li.5l  HRITE(6,5491)  I,J,PARTS,QPA, 

C  1  HRXAC(I,J),fWUICII,J),l1H(J),HAXHIS(I,J),HISnJI(l,J), 

C  2  ATTRIT1I,J),ATRATE!I,J),SLIJI 

5491  F0RNfiT(2I4,HF12.4) 

5499  WfflXAWWXACtl.JI 

C - ■  # 

C  CALCULATE  AUAILAILE  A/C  FROM  PARTS  OH  HAH!' 

C - 

IFICAillRDGO  TO  55 
C 

C  IH  THE  N-C  NODE  TIC  PARTS  BUCKET  CAN  BE  NEGATIVE  SIGNIFYING 

C  A/C  GR0UN1EI  WE  TO  SHORATGE  OF  SPARES  m 

C 

IF( PARTS  .GE.  0.0 IflUflC 

IF1PARTS  .LT.  I.IIAVAC  =WUWI,JI  -  RBSIPARTS  /  QFfl) 

GO  TO  56 

55  AVRC  =PARTS  /  QPA 

c - 

C  HAKE  SURE  HOT  BIGGER  THAN  MAXIMUM  WR’ CABLE  R/C  AFTER  ATTRITION  • 

C - 

56  IFTAVAC  .GT.  RHRXRCTAVAC  =RNftXRC 

C - 

C  HAKE  SURE  HOT  HEGATIVE 

C - 

IFIAVAC  .LT.  I.IAVAC  -i.  • 

IFl.HCT.CRITIC)  GO  TO  565 
IFIAVAC.GE.l.l  GO  TO  565 
IFII.GE.IDAYCU))  GO  TO  565 
IIBYCIJW 
BO  569  K-1,3 

569  HSHC!K,J)=HSH!K)  • 

561  F0RHAT(1X,3R4,A3,I5,£X,SW,A3! 

565  COHTINUE 

IKAVAC  .GE.  AVLRC(I,J)’rO  T"  65 

C - 

C  HRITE  HSH  TO  OUTPUT  FILE  FOR  THQ'JIRt 
C - 
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IFt.lWT.  FLAG14IG0  TO  it 

MRITEU4, 815)1,  WSI1t(HUK,LST!!JSIJ)l,K=i,4i,  PARTS, 
i  IQPA(J),iP)tAC,AVLAClI,J),AVAC 

57  IFI.HOT.  FLAG161G0  TO  59 

CALL  IFITCH($58,HSH,N1,N2,N3,NINHIBS,NLI]1TH,INBX) 
GO  TO  59 

58  CALL  IST0A£t$59, ASH, 111,112, A3, NHOAJS,llOtTH,lin£E) 
URITEt 16,701 )HSH 

59  AVLAC  (IfJ)=flUflC 

c _ 

C  CAPTURE  LAST  CRITICAL  PART. 

C _ 

IF( .HOT.PflCIHGlGO  TO  64 
BO  63  K=l,4 

MtStl1(K,I)=HSf1(K) 

63  CONTINUE 
CRLISTtl, I )=IIL 
CRLIST(2,I)=PARTS 
CKLIST13, I )=FR 
CRLIST(4,I)-SCP 
CKL1STCS, I )=ICP 
CRLIST(6,I)=IBRT 
CJtLISTC7, 1  )=I1RT 
CRUST!  8, 1  NIP 

64  CONTINUE 

C - 

C  CALCULATE  NEH  ATTRITION,  SORTIES  FLOW  Aid  AVAILABLE  A/C 
C  BASEI  ON  HEM  HIHINUH  PARTS  AVAILABLE 

C - 5|\ - 

irilH(j)  i  AVAC  .LT.  HAXHISd.J)) 

I  flISFLmi,Jl=fflICJl  I  AVAC 

ATTRIT1I,JI=ATRATE1I,J)  «  HISFUMI.JI 
NAXAC(NXTBAY,J):RHRXAC  -  ATTRITII.J) 

65  ATTR  =ATTRIT(I,J) 

C - 

C  CALCULATE  FRILURES  (BUT  HOT  ON  LOST  R/C) 

C - 

FTfB  =(NISFU1U,J)  -  RTTRU  SLIJ) 

FRILIANR  i  FHPI  *  QPfi 
TFAIL  =TFflIL  ♦  FAILUR 

C - 

C  CALCULATE  BASE  ANB  DEPOT  RETURHS  TO  INVENTORY  IN  FUTURE 

C - - - 

BASRETIIIBRT BAILOR  *  BASPCT  ♦  BASRET(IIBRT) 
BEPRETt IIBRT)=FAILUR  I  BEPPCT  ♦  DEPRETIIIDRT) 

C - 

C  CALCULATE  HER  PARTS  ON  HANB 

C - 

IF(CAHBAL)  PARTS  =PARTS  -  ATTR  *  QPA  -  FAILUR 
C 

C  IN  IK  NOBE  ONLY  FAILURES  GET  TAKEN  OUT  OF  PARTS  BUCKET 
C 

C  TURN  OFT  FIRST  THE  THRU  SH1TCH 
C 

C  SAVE  HOB  FOR  USE  AS  ’LAST/PREVIOUS  IBS’ 

C 

IF(.NOT.CAHBAL)  PARTSH(JI=PARTS-FAIU* 

FIRSTKFALSE. 

LASTW=J 

66  CONTINUE 


121 


Q 


u 


c - 

C  SAVE  PART $  LEFT  AFTER  TODAY'S  HAVOC  TOR  TOHORROM  KGIHMIMt 

C — - 

POA  =PflRTS 

67  CONTINUE 

c - - - 

C  ROUTIHE  TO  CALCULATE  HEW  IHITIftl  INVENTORY  FOR  FUTURE  TERRS 

c - - - 

IFIENIFLGIGO  TO  79 
fffERS  =PESOPT5  IPBflYS,  .FALSE.  ,1 1 
IFIHPERS  .LE.  HUGO  TO  68 
1IL  ^IffERS 

68  HHRR  =«R0P?!IHIftYS,.F3LSE.,l) 

IFINHAR  .LE.  IIL1GO  TO  69 

I1L  ^iflR 

C - - - — - - 

C  DECREASE  CALAMI  INVENTORY  IY  PEACETIHE  FRILURES 
C - - - 

69  IIL  =11L  -  HPEAS 

C - -  — . — - - 

C  WIFE  m  INVENTORY  OH  WORK  FILE  FOR  NEXT  YEAR’S  PROCESSING 

c - — - 

«ITEilOi(LISTl(II,l=l,HHORDS) 

C - — - - - 

c  CALCULATE  TOTAL  COST  AM  TOTAL  PARTS 
C  COMEHNRTION  FOR  188  IIGGEST  THIEVES. 

C - — - - - 

?n  TTCM-TFAILK 1.  -IflSPCT-DEPPCT ) 

THIEF=nCWWOSTM  TTBRS/3.  +TTDEP  WJRfOST 
IFIIHTITHIEF)  .ME.  OTCflLL  CBTSPR1 THIEF, TFBIL, TORS, TTIIEP , TTCM) 

GO  TO  50  _ 

C  CRLCULRTE  CflNHlBflLlZEl  R/C, SORTIES  PEP  R/C,  l  SORTIES  FLOWN 
C  RHB  HISSIOHS  ACCONPLISHENDflSEl  OH  ELYIIK  PROGRAM) 

C — — - —  — - - 

89  CONTINUE 

IF(. NOT. CRITIC)  GO  TO  8102 
N  8001  J=l,mWlDS 
IF(I1IAYCUI.GT.368 1  GO  TO  881' 

HRITE(6,56U(NSHC(K,J),Kst,4),niRYCiJ),(Nl(l!,LSTNllS(J)),K=l,4) 
8901  CONTINUE 

3912  CULL  PAGEII6) 

DIMENSION  IIPPMTI1BI) 

DATA  IIPPNT  /  l,  2,  3,  4,  *■  7,  9,  9,18,11,12,13,14,15, 

«  16, 17, 18, 19, 22,21. 22, 23, 24, 25, 26, 27, 28, 29, 31, 

i  15131, 15*32, 38*33, 38  C4,3fi35, 39136/ 

DO  11997  IT1T=1,18I 

11997  IPOINTlITITMIPPtmiTIT. 

WITEI86, 819  )JYR,  TAILEV1 IHT  ( DEL !«'  1 7' » 

DO  89  J=1,IMWS 

JJ  =LSTMIS(JI 
10  82  I=l,NBflYS 
Pff(  I  )=i. 

NXT5AY=l  ♦  1 
INDEX  MPOINTd) 

HG957SI I  JJ,  IH»E4 ) 

RRXACIHXTDAY.JI^NBXRC!  I,J!  -  AT1R1TU,J) 


» 


CALCULATE  CAHNIIAUZEl  R/C 
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mcsuHWXRCiij)  -  ni''Rr?,j) 

IF(NHCSII)  .LT.  I.UNHChf  1)4.1 

iHcnwiucRmiii  i  )=wicsm 

FflPflC  4. 

in«wciitj).CT.a.)Fiffic  ^x»isu,j)/fRycn,j) 


CALCULATE  sorties  PER  fl/c 

IFTFHPflC  .CT.  munnnc  4N(J) 

NPflct  i  )=nipflc 

CALCULATE  PERCENT  SORTIES  FLOWT 
PCNT  4.1 

inmffllS(I,JI  .GT.  MIPCIT  =  III.  * 
l  HISFUKI.J)  /  mXRlS-*ItJl 

IFfPCNT.GT.10l.)  PCIIT- 100. 

ifipcjit  .11.  iiMmriiMar 

IdllSSt  1  )=(PCHT  /  lll.l)  i  HOURS!  I) 

COUTURE 

IFF  .MOT.  FLAGll  ICO  TO  83 
CULL  PflGElll) 

«lTE(ll,8l6)JYR,flTRflTE(!,J),(m'l(,JJ),M,4) 

WRITE! 11,8141 

PRINT  OUTPUT  REPORTS 

I  CONTINUE 

IQ  83111  1=1,11 

IOUTUM 

CONTINUE 

CUNSWI4.I 
N  84  I=1,NMYS 

NISFLN  ARRAY  RILL  IE  USEI  TENPORARTLY  FOR  'PCT  fMCS’ 

I!  4IAYS  -Ml 

NISFUWI,J)4.I 

Rinxf)c=Nflxnc(i,ji 

PERCNT=PNF(K) 

IFIRNRXAC  .NE.  I JMISFLm I, J)=(NMCS< I)/RI1ftX«:)*ll8. 
IFIPERCNT  .LT.  lll.l HOUH  1)4 
IFIPERCNT  .LT.  75.DI0UT!  2)4 
IFIPERCNT  .LT.  5M)I0UT(  314 
IFIPERCNT  .LT.  H.DI-M!  4)4 
K  =INT(PNF!I)  ♦  .5) 

IF! I  .EQ.  51I0UT!  514 
IF! I  .E|.  1DIOUT!  6)4 
IF! I  .EO.  15II0UT!  7)4 
IF! I  .E|.  ailOUTI  8)4 
IF! I  .EQ.  3DIQUT!  314 
IF! I  .El.  45)I0UT(lt)4 
IF! I  .EQ.  6l)IOUT(ll)4 
IFiRUUCII.JI.LT.l.)  GO  TO  85 
IF(.NOT.  FLfiClDGO  TO  84 
X  4NF1I)  l  HOURS* !)  i  .11 

CWBIMUHSUN  ♦  X 

«ITE(  11,81511 ,  HOURS! !  V'  J),NAXNISI  I,  J' . 
i  HPAC1I),RNAXAC,RTTRIT  .INCS(I), 

»  NISnjl(I,J),(WLRCII,,',Pr  fI),X,CUNSUN 


i 

t 
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ini  .lit.  55 'GO  to  34  ~ 

CALL  PAGE! 11) 

WRITE!  11,M6)JYR,PTRP7E(  l,J),(RUKK,  JJ),KK'l .  ? ' 

WIITEI 11,814) 

CONTINUE 

■L  ’.r  .ST.  ".RGiaiGO  TO  8? 

"j  ec.i  :--i,Hinvs 
?i:';;":i=cwiiiBU) 

Fj’iiKHiws+n^fwiflca.j) 

Pl0TimiO8YSt«MYS+n=«flXflC(  !,J) 

851  PLOT1M  3*H1AYS*I  )=PHF  1 1  > 

CULL  PLOTPTI 4,  IHDAYS,  12, PtHT  If  ,«Wt, HMtl ) 

*1TE112,388)  JYR,flTHflTtU,JK(mtKK,JJl,KK=l,41 

87  IF(. HOI.  FL8G13IG0  TO  88 
IF(KLTRI32).IC.8.)  GO  TO  8711 

M  871  I=l,«flftYS 
PL0T11U 1  )=H0URSt  1 1 

871  PLOTIift  I*HBAYS)=ACHIT  jl  1 ' 

Cm  PlOTPT(2,IMRYS(13,PLCTlH,l«K)nftl1E2) 

WR1TEI  13,806)JYH,flTRflTEI  1,  JT ,  IT4HKK,  JJ)  ,Wt=l  ,4) 

C  #ITE  OUT  flYIHG  PROGRAM  AND  ACCOHPUSWENTS  FOR  USE  BY 

C  PLOTTING  PROGRAM  LATER. 

C - 

GO  TO  88 
8711  CONTINUE 
IREC=HBPTIJ) 

REAN25MRECI  RQRTS 
RERB126’ IREC)  CflPfllL 
80  8721  I=1,HDRYS 

RQMTSl I )=RQHTSt I ) ‘HOURS! 1 ) 

CAPRBLII)=€APABU  U+ACNISSII) 

8728  CONTINUE 

ISITE!25’1REC)  ROUTS 
HRITE!26’IREC)  CAPAIL 
GO  TO  888 

88  CONTINUE 

IFIDELTA133).LE.0)  GO  TO  388 

MR1TE(28,887!  (Nim,,JJI.«-l,4),IHIIfiYS 

887  F0RHAT13A4, A3, 15,28  V,'  REQUIRE!  riYING  HOURS  ANI  ’, 

1  'FLYING  HOURS  HCCOHFL1SHL1T.10X) 

WRITE!  28 , 888 )( WJR  ■  f  RC ! ,  RCNISSl  I*  I ,  W-l ,  1HWYS ) 

888  F0RNAT12F12.I,58X) 

c - 

t  WRITE  REPORT  18 

C - 

888  «ITE10S,811llHl(K,JJI,r=t,2!,I0UT 

88  CONTINUE 
CALI  PAGE! 88) 

IN8X=(IWaY$M9)/2fl 
HRITE(8,888)  U,M,1WAYS,IH8X) 

898  FORHATiT,28VLCH$  O'iER'JIEH  AIRCRAFT  AUAILABILITY  RESULTS’/, 
1  21X, 'PERCENT  ORIGINAL  A/C  AN8  PERCENT  NON-ATTRITEB  fl/C’ 

1  //, 

1  ’  HIS  \28X,’HfiR  BAY’/, 12X, 2816) 

10  899  J=l,HUNNIS 

IQ  891  I=1,IHFYS,:NIX 

891  PNF(I)=ItMAVLACU,J)/NRXAC(l,J! 

HRITEI6,392)  Cl"  .LSTHBSU)),KK=t.:  . 

!),I=1,1HDRYS,IH[ 

:’-,:'UX,2m,A3,28F£  U 
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N  893  1=1,  IHWYS,  IHDX 

«i  IW(!)slll.«UC(I,JMIWllJ) 

HRITE(6f 894)  (PWU ) ,  1-1,  IHDfiYS,  IWK) 

??*  r''RHATU2X,28F6.1) 

«°5  CmilNUE 

IF(9ELTfH32).LE.O )  GO  TO  8999 
IREC=8 

DO  3997  J=1,NUNNBS 

!F(  I8EC.EQ.HBPK Jl)  GO  TO  8997 

IREMUPT(J) 

108(25’ IREC)  ROOTS 
R£R1(26’IREC)  CAPA1L 
80  8991  I=1,N8RYS 

PL0T1IU1  )=RQIfTS(  1 ) 

8991  PLOTIlft  I+N8AYS  KRfflUl  1 1 

CULL  PL0TPT12,IWDAYS,13,PLQTIN,HARK,NAHE2) 

WRITEI 13,8717)  JYR, LH 1 ,  1REC ) 

3717  FORMm’OYEAR=’,I4,’  H»=  \A6> 
IF(IELTR133).LE.I)  GO  TO  871? 

*ITE(»,8718)  LHl,IREC),lHBf)YS 
8718  F0RNAT(A6,9X,I5,28X,/,’  REQU1R0  FLYING  HOURS  RNB 


8719 
8997 
8999 
C — 


1  ’FLYING  HOURS  RCCONPLI$HED’,10X) 

WITE(20,888)  l PLOTIHl KK ) , PLOT  11*1  KK+IW1AYS) , KK=1 , IHBRYS ) 
CONTINUE 
CONTINUE 
CONTINUE 


C  PRINT  CRITICRL  PRRTS  LIST. 

C - 


in.NOT.PRCINGlGO  TO  9506 
WRITE! 18,884) 

88*  F0RNRT11H1,’  CRITICAL  P  H  R  T  S  LIS  Tj',/, 

«  ’  IflY  NRSTE8  STOCK  NO  INITINU  POH  FL  RATE  1C  V, 
i  ’  1C  V 

« 1  irt’  drt  nrtsv, 

*  - ; - 

i  i  _ _ 


i 

->) 


10  9058  1=1, MAYS 

WRITE(18,885n,(NNSNH(KKl,I),r.KI-l,4),(CSLlST(KK2,I),KK2=l,8) 
9051  CONTINUE 

385  F0RNRTU4,lX„4A4,2F11.0,Fl0.e.2nD.2,2F10.1,F11.2) 

9500  CONTINUE 

C - 

C  PRINT  100  GREATEST  THIEVES 

C - 

CRLL  CRTRPT 


C - 

C  SWAP  FILES  TO  USE  HEW  INITIAL  IWENJORY  FOR  NEXT  YEAR’S  PROCESSING 

C - 

90  IFIENIFLGIGO  TO  99 
REWIND  II 
REHIH1  10 
II  =3  -  II 

10  =3  -  10 

GO  TO  10 

99  WITE(16,858) 

IF(FLAG17)C»1  REPT17 
STOP 


4PUT  FORNATS 
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1 


•  a 


SORTIE  RATE 


Mini!  rflRHATS 


804  FQRHATl’t 

i 


REQUIRES 

LOST 


PERCENT 


*  '  FETING  SORTIE - ASSEH1LEB’, 

«  •  BY  UNFLYRBLE  m  FURUE  SORTIES', 

i  '  HOURS  CUN  HOURS',', 

*  '  MY  HOURS  LENGTH  FLEET  EACH  ftCFT  AIRCRAFT  ', 

l  '  ATTRITION  AIRCRAFT  PERCENT  AIRCRAFT  FLOW 

»  ’  FLOW  FLOW  ') 

315  F0RNRT(I4,4(F1I.I,F10.2),4F1B.1) 

816  EORHftTT ’IYEfl8=’ ,I4,5X, ’ATTRITION  RATE  USEJ!’,F7.4,’  FOR  NOS:', 
i  2X  3R4  R3) 

811  FORNflTCI’jlIXj'SUNHARY  FOR  ’,14, 
f  ’  (SPARES  NIJH  ESSENTIALITY  COSES  >,A3.’ )»,//, 

«18X, ’1AY  AT  WHICH  PERCENT  PERCENT RGE  SORTIES’,/, 

»13X,  ’  SORTIES  FLOW  REACH  FLOW  FOR  VARIOUS’ , / , 

■I8X, *  VARIOUS  LEVELS  RISSION  BAYS’/, 

I18X  ' -  ’  35i>-»)  / 

H8X/  FIRST  BAY  1ELOH  ’  ’  ’ H1SS10N  BRY’/ , 

ij®{  i _  »  35/ -’I  / 

HOX/WS  ’,'  100?  75?  51?  25?'  ’  5  11  15  20  30', 
l  ’  45  60’,/, 

*10X,’ - - yi’  — ’>> 

811  FORNRT(10X,A4,R3,1X,415,2X,?I5} 

814  FORNBTl’lPROBLEN  SPARE  REPORT’ ) 

815  F0RHRT(1X,I3I1X,3R4,A3,1X,3R4,R3,FU.2,116,3F1&.2) 

850  FOMRTf 'ROUND*  I 

870  FORWTCIRUH  CONTROL  SECTION:’,', 

i  i - )  // 

i  ’  YEAR  *V?/, 

i  ’  PERCE  DAYS  **,17,/, 

i  ’HRRMYS  =’,171 

END 

’ATTRAT’  INPUTS  NUWERS  Of  ATTRITEJ  B/C 


SUBROUT lit  ATTRAT(ATTRIT) 

THIS  SUBROUTING  OBTAINS  SORTIE  LENGTHS, HOURS  BOW,  flttt 
NUWERS  OF  ATTRITTE1  A/C  PER  BRV 

DIHEHSIOH  HBST4) 


COWON  /NISJEG/  AR154),WSWl54l,SU54) 

COWW  /BLOCW/  Nl(4,200  l,N?i  300 1,H3I20I),NH0RIS,HLENTH,IFR£E 
COWON  /HOCW/  LSTFSCI2II  ),LSTNBS(200  ),LSTALC(5),NBXREF(  70,2(  I, 
*  IFXREF ( 50 , 23 1 , JCUUNT, XCOUNT , LCOUNT , HCOUNT, 

«  NONNIS ,  NWTFSC,  (WNALC,  JWUNT  ( 50 ),  IKOVNT  /  78 ) 

INTEGER  BAYIU) 

PINION  RTTRITU40,3),VAL(1C 

/ITiflLLTE  HOURS  DOW  RN?  SORTIE  LENGTH 
«  iR  ATTRITION  RATE  IS  *0?  USES 
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r 


* 


r 


r 


M. 

r 


r 


M  1-1,3 
IK  l I )=S.I1 
tSSDH  (1)4.1 
SI  (1)4.1 
C 

C  INITIALIZE NUNIESS  Of  HTTRITTED  IK  10  200 
C 

10  11  M,144 
flTTRIT(J,n=#.6 
it  continue 

t 

c  eon  in  oh  ids  tm,nmn  mum  m, sortie  lewgth 

c 

?l  R£flQ(t9,7ll,EM=*)  MS,X,Y,Z 

C 

C  LOOK  UP  MS  rtflHE  INDEX  IS  POINTER  TO  KMC 

C 

to  38  i=i,nunnis 

irt INDEX  .EQ.  LSTNISIIDGO  TO  48 
31  CONTINUE 

GO  TO  21 

48  CONTINUE 

C 

C  STORE  KTTRIT  RATE, HOURS  MM, SORTIE  LENGTH 
C 

IFIUT.R.)  flR(I)=X 
IFIY.GT.M  HRSINdl-Y 
IftZ.GT.t. )  SL(IW 
GO  TO  28 
08  REMIND  89 
C 

C  REftl  IN  NDS  NONE  AND  12  VALUES  FOR  NUR1ERS  OF  HTTRITTED  ft/C 
C  THE  12  VALUES  ORE  AGGREGATE!  HEWERS  OT  RTTRITTED  ft/C  AT  THE 
C  EM  Of  DBYS  5, 18, 15,28, 25, 38, 48, 45,68, 78, 81, 98 
C 

51  REfillUyi2,EHW5l  IQS, (ML 
282  F0RNRTI3ft4,R3,12F5.8l 

CALL  IEETCHl 851, NSS,N1,N2,N3,WRJS,NLENTM, INDEX) 

10  60  i-i,NUNNlS 

IF( INDEX  .EQ.  LSTMS(II)  GO  TO  70 
68  CONTINUE 

GO  TO  58 
71  CONTINUE 

LOW 
C 

C  EXTRACT  NUHBERS  OF  RTTRITTED  PER  MY  Ff  GENERATING 

c  wrrs  FOR  periods  dnd  dividing  iy  length  of  period, either 


11,  OS  15. 

SEE  DOCUMENTATION 

H12 

in  j  .Li. 

7JLIN 

-5  *  J 

IFU  .GT. 

61LIN 

=(J  -  3)  1 

11 

IFU  .EQ. 

8IUN 

=45 

IF(J  .GE. 

12ILIN 

=128 

IF(J  .LE. 

nx 

=VfllU)  ■'  1 

3.1 

IFU  .GT. 

l  .m. 

J  .LE.  FIX 

=(VflLUH/fi LU-I 

IFU  .GT. 

ox 

-miui  - 

mj- 

III  /  18.8 

IFU  .EQ. 

SIX 

=(VRL(J)  - 

VflLIJ  - 

D)  /  5.1 

IFU  .EQ. 

SIX 

=(VR- U  - 

VIILIJ  - 

D)  /  IT. 

JO  75  X4QM.LIN 

ATTRIT(X,I)=X 
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LOHIIHI 
CONTINUE 
GO  TO  58 

*o"’:.he 

:'iiINl  19 

?r.*;N 

781  ':RNflTI3fl4,R3,3F6.2) 

end 

C  'CRTSPR'  SORTS  109  BIGGEST  THIEVES 

c 

c - 

SUBROUTINE  CRTSPRt  THIEF, TFRIL, TTSRS. TTDEP, TTCHD) 

C 

C  THIS  SUBROUTINE  IDENTIFIES  SAVE  ,  AND  DISPLAYS 
C  Tit  180  BIGGEST  THIEUES  WITH  RESPECT  TO  VARIOUS  NERNS- 
C  COIUONRTION  COST,  BASE  REPAIR  COST,  RN1  1EPOT  REPAIR 
C  COST  RNI  THE  TOTAL  OF  3  COSTS 
C 
C 

DINENSION  THFCSTT  188 ),  TGTFfiLT  US  (,  TOTBflSI  1*8 ) ,  TOTDEPT  188 ) 
BINENS10N  REPlflST 1*1 1 , HSNBftST 4, 111 ), REPDEP1 188 ),HSHBEPt 4, 186 1 
DINENSION  CSTFHLt  188 ) ,  NSNFRLi  4,188) 

DINENSION  CSTNWl  118 ) ,  BEPNUNl  18*1,  BRSNUNl  180 ) 

DINENSION  TOTCN11 168 1,  ISTOCXt  4, 18* ) 

CONNON  /BLOCK/  NSN(  4 ),  COST,  I  AIT ,  IFLT,  IOST,  DP,  BP,  &P,  DCP,ONICP, 
«  ONBCP,FR,ORCO:i,  1BRT,  IDRT,  IIL,  IILS,  HUB,  IILO, 

i  NEHURRIIOUQPRIEO1)) 

C 

DATA  TffCST/18*i-1.6/,REPBfiS/198*-l.8/,REPBEP/18»i-1.0/ 

iRffl  csm/tm-ijy 

IFlTHIEF.lE.Tlf CST(  1*8 ) )  C-0  TO  1*8 
DO  18  1=1,186 

IF1THIEF  .GT.  THFCSTT 1 1 )GO  TO  28 
1*  CONTINUE 

C 

GO  TO  188 
28  h  =188  -  I 

I  =1*8 

IFfN  .Efl.  8)G0  TO  46 
BO  3*  J=1,N 

LAST  =1-1 

THFCSTT I )=THFCSTT  LAST  J 

T0TFRU1)=T0TFAUIR$T) 

TOTBflSI Il=TOTBflS( LAST  I 
TOTIEPT I 8=TOTIEP( LAST ) 

T0TCH8T IJ=TOTCNDTLAST) 

10  25  8=1,4 

ISTOCK(K,I)=ISTOCK(K,lAST) 

25  CONTINUE 

i  <DST 
38  CONTINUE 

48  THFCST(I)=THIEF 
TOTFALTI )=TFB1L 
TOTBflSI  l  l=nBflS 
TOTIEPT I l=TTBEP 
TOTCHDT l )=TTCHD 
*1  45  8=1,4 

•=T?  <Tlt,I)=*!SHfK) 

^  ""*  * ;nue 


KC=ITlEPi»CtJST 

TFOTTCI®OST 

FPT=TTIftS»URC0ST/3. 

IF( IRC.LE.REPMSl  19® ) )  GO  TO  231 
N  111  1=1,99 

inRC.fl.KPNS(in  GO  TO  121 
111  C0NT1IWE 

GO  TO  141 
121  CONTINUE 

l=iu 

N  131  J=l,HI 

N=lll-J+l 

LflST=H-l 

REPMS(N)=S£PiaSlLflST) 

|RSIfUHUn=l8SnW(LflST ) 

10  125  1=1,4 

125  HSHMSU,H)=«91JaStK,LftST) 

131  continue 

141  REPBDSl I )=BRC 

WSNUNII)=TT1RS 
90  145  K=l,4 

145  HSNMSIII,!  >=NSNU) 

211  IFllRC.LC.RCPIKPt 111 ) )  GO  TO  311 

90  211  1=1,99 

IFdRC.GT.REPBEPlUl  GO  TO  221 
211  CONTINUE 

GO  TO  241 
221  CONTINUE 

L=M 

90  231  J=L,1II 
IMII-J+L 
LRSI=N-1 

REPDEP1 H )=NEP9EP1 LOST  1 
IEPNUNIN)=IEPNUNIU1$T) 

N  225  11=1,4 

225  NSNBEP(I1,«1=HSN1EP1I1,IJBT) 

231  CONTINUE 
241  REPBCPt I )=BRC 
KPNUH(I)=TTIEP 
90  245  11=1,4 

245  NSNKP(E,1)=NSN(K) 

311  IF(TFC.lLCSTFH(Uin  RETURN 

N  311  1=1,99 

IFlTFC.GT.CSTFflLt I > )  GO  TO  321 
311  CONTINUE 

GO  TO  341 
321  CONTINUE 

1=1*1 

90  331  J=l,lll 

N=lll-M 

UBT=N-1 

CSTFHLCN)=CSTFflL(LflSTl 

CSTNI1N1NI=CSTNUN(IBST) 

10  325  11=1,4 

325  NSNFflL«,N)=NSNFHlK,UISTl 

331  CONTINUE 

341  CSTFflLU)=TFC 

CSTNUNUMTCM 
10  345  X=l,4 

>*=  HSNFRL(I1,I)=NSNI» ' 


RETURN 


129 


01TRY  CRIRPT 
CALL  Pflfff 96) 

U*1TE(16.304) 
m2ITX(46,89U 
BO  56  1=1,198 

IF(TffCST(I).LT.O.fllGO  TO  58 
HRITtl 86, 892)1, ( ISTOCJCC J, II , J=l , 4 > ,  HFCST 1 1 ) ,TOTFRU l ) , 
i  TOTIflSt 1 ) ,T0TDEP( 1 5,T0TCKB( I ) 

WRITE(16,893)(IST0CKIJfI),J=l,4) 

If (I  .HE.  581G0  TO  5« 

CALL  PRGEI86) 

WRITE(96,891) 

58  CONTINUE 
CALL  PRGE(96) 

UR1TEOS  911) 

991  FORNRTf , I5X, ’BftSE  REPAIR  COSTS/  IDO  LARGEST  ITEHSM 
WR1TE186,982) 

9flH  FQRNflF! 'I', 4X, 'RASTER  STOCK  HO  TOTAL  COST  NUMBER’) 

90  60  1-1,198 

IF(REP!RS(I).LT.8.9)G0  TO  69 

WRITE186,892)  I,  tHSNmK,I),K=i,4l,REP8AS(l),BASNUMl) 

69  CONTINUE 
Cm  PAGE196) 

WRITE! 96, 993) 

993  FORMAT! ’I',15X,’ DEPOT  REPAIR  COSTS/  188  LARGEST  ITEMS’ ) 

WRITE! 86, 992) 

90  79  1=1,101 

IF(REPBEP(I).LT.8.8)G0  TO  79 
HRITEt  96,892)  1,CNS«1)EP(K,I  ),K=l,4),RfFBEPa),BEPNW9C  I) 

79  CONTINUE 
Cm  PAGE!  86) 

«RITE(86,994t 

984  FORWITI ’  1  ’ ,  15X, ’ COflJDWBT ION  COSTS/  189  LARGEST  ITEMS’) 

WRITE(86,982) 

DO  89  1=1,199 

IF(CSTFfiL(I).LT.9.9)GO  TO  89 
WRITE! 96, M2 )  I, ! HSHFHLIK, I ) ,K=1 ,4) ,CSTFHL(  I ) ,CSTNUN!  I ) 

89  CONTINUE 
RETURN 
ENTRY  CRTCLR 
DO  691  1=1,199 
THFCST! I )=8. 

REPTOSt I)=0. 

REPKPUN. 

CSTFflLt I)=0. 

TOTF«Lin=9.9 
TOTMSI  I)=t.O 
TOT9EP91 )=!.» 

TOTCHll  1)4.9 
698  CONTINUE 
RETURN 

891  FORNflTt , 15X, 

l  ’  «?EPffimiUE  SPfWE  NAINTRINRIILITY  fWJ  RELIABILITY  PRIORITY’, 
i  ’  ANALYSIS’,//, 

i  5X, 

i  ’NRSTER  STOCK  NO  TOTAL  COST  FAILURES’, 

i  ’  IASE  REPS  9EP0T  REPS  CONDENNED’,/, 

«  5X,6!  IX,  191 ’-»))) 

?PT  '"W*'TUX,I3,1X,3A4,A3,5F15.8' 

?':  .’-ri 384,03) 


•PLOW  PROVIBES  LINE  PRINTER  PLOT  Of  Iff  TO  II  CURVES 


:  THIS  subroutine  plots  total  benanbs,  TOTH 

C  REQU1RENENTS  AND  PURCHASES  OVER  NO.  OF  WAR 

C  BAYS. 

C 

C  STATUS:  SUBROUTINE 

C 

C  LANGUAGE:  FORTRAN  IU 

C 

C  PRECISION:  SINGLE 

C 

.  REQUIRE!  SUBROUTINES:  PLOT 

C 

C  LAST  UPBflTE: 

C 

C - 

C 

SUBROUTINE  PL0TPT(LIHES,N,1UNIT,X, HARK, PANE) 

C 

C  THIS  SUBROUTINE  HILL  PLOT  UP  TO  1»  CURVES  WITH  IIP  TO  36! 

C  VALUES  PER  CURVE 
C 

C  LINES  IS  THE  NURSER  OF  CURVES  (UP  TO  II) 

C  N  IS  THE  HUH1ER  Of  OBSERVATIONS  PER  CURVE  (UP  TO  361) 

C  IUNIT  IS  FORTRAN  UNIT  NUN1ER  FOR  HRITES 
C  X  IS  THE  ARRAY  OF  OBSERVATIONS  (PACXEB  ,  NO  HOLES) 

C  NARK  IS  THE  ARfflY  OF  CHARACTERS  FOR  PLOTTING  EACH  CURVE 

C  NfiNE  IS  THE  IESCRIPTION  FOR  THE  NRRKS/CURVES  (LEGEND) 

C 

DOUBLE  PRECISION  NONE 

DINENSIOH  ISPQTl  3640 ) ,  IK  375 1  ,X(  361!  1  ,lf.RK(  II ) ,  HfflEl  4, 10 ) 
DINENSIOH  Y(3U),NUH(1I) 

INTEGER  THO, SLASH 
EBJIVALENCE  (HUN13),TH0) 

LOGICAL  XINTGjYINTG 
C 

COWON  /PL0TER-'  HIGH, LOU, ALOHST.^ALE 
REAL  LOW 
C 

BATA  I  BLANK  /  1H  / 

DATA  IB  /  375HH  / 

DATA  LINS  /  52/ 

DATA  NUN/1M , 1H1, 1H2, 1H3, 1H4. IH5.1H6, 1H7, tH8, 1H9/ 

BATA  SLRSH/1H// 

XINTG=.TRUE. 

YINTG=.TRUE. 

C 

H  =IAK(LINES! 

IFILINES  .EQ.  I (RETURN 
YLON. 

YSCL=1. 

IF(N.GT.3I.RND.N.LT.121)  GO  TO  4 

10  3  1=1, N 

YII)=I 

CONTINUE 

CALL  PLOT(Y,N,ISPOT,. FALSE.,  121) 

YLOV-DLOHST 

YSa--SCALE 
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;F'W.1E.jSCLJ  yintg=. false. 
b  IF-.  r-  r(X,LIHES»«,lSPOT,. FALSE., 52' 

CALL  FAtE(IUMT) 

I=SCALE 

XX=I 

IFIXX.Iff.SCALE)  XIHTC=. FALSE. 

90  7  1=1,129 
IKD-IUK 
90  50  1=1, LIDS 
LC  =1 
90  39  K=1,H 
BO  29  J=l,H 
a=(J-YL0H)/YSCL*9.9 
JL=FL 

IF(ISP0T(J*«-1)«)  .Iff.  DGO  TO  29 
lFUlUU.Efi.mUK)l  CO  TO  19 
IFC  ID(  JL).M£.  IlLBIIKI  1BCA)=TU0 
IF(  III  JL).EQ.  HUNT)  IMJLMMHK) 
LC  =JL 
CONTINUE 
CONTINUE 

lFlHOlll+3,5)  .HE.  tlGO  TO  35 
XSP  =(52  -  I)  «  SCALE  ♦  ALOJIST 
ISP=XSP 

IF(.NOT.XINTG)  *ITE(IUH!T,812)  XSP, (191X1,1=1,129) 
IFIXIHTC)  *ITE(1UHIT,89211SP,(IBI»),K=1,129) 

CO  TO  41 

IF1LC  .HE.  »)W1TEUURIT,W3M11IU,K=1,12I) 
IFILC  .EQ.  9)IKITE(IUHIT,893) 

IF1LC  .EQ.  9  ICO  TO  51 
90  45  J=l,12l 
I9(J)=IBLAHK 
CONTINUE 
CONTINUE 
WITE(IUHIT,894I 
LL=5 
IHC=5 

IFIN.GT.48)  CO  TO  99 
LL=1 
IHC=1 
CONTINUE 
BO  91  1=1,129 
IKIMBUW 
90  199  J=LL,H,IHC 
FL=(J-YL0H)/YSCL*9.9 

j.=a 

I91JL)=SLRSH 

WRITE! IUH1T, 89?)  (19(11,1=1,129) 

F0MATU2X,129A1) 

90  119  J=41,N,  INC 
a=(J-YUW)/YSClt9.9 
JL=a 
JW'IBO 

J2=J/19-19i|J/199) 

J?=J-19l(J/18) 

:'(AI=NUH(J3+1) 

:  (A.L1.2)  GO  TO  119 
"Ul.ST.O.OR.JE.GT.B)  IBUL-ll^.bt.'  \) 
‘(A.LT.3)  GO  10  119 
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!«f  rwiMvr 


'  Si  -  'A* 
J  -  ‘ 


'  :v* 


812 

812 

893 

814 

815 
815 
818 


«ITE(IUHII,8»8)(lfflR|[m,(H«lE(J,I).J=l,4n,IM,H) 

F0WflmX,Fll.3.*\»,128fll) 

F«9BT(lX,Illt'\»,12lftl) 

FORHRTI UX,  ’ ,  120R1 ) 

F0RHAT(11X,’\’,12I('-’)  ) 

FQSHRT(12X,12I1I) 

F0RMTI12X, 24151 

FQ8*T(>l»,t5X,»2  -  MORE  THAN  ONE  QBSER*JATN’,UX,Al,’  -  »4fl6,/, 

1  16MV  -  ’,486,9X,At,'  -  ’,4A6,/,16X,A1,’  *  ’,4A6,9X,A1, 

2  ’  -  ,,4R6,/I16XIH1I*  -  ’,4A6,9X,A!,’  -  >,4A6,/,16X,A1,’  -  », 

3  4A6,9X,A1,'  -  ’,4AS,/,16X,A1,’  -  *,4M) 

RETURN 

END 

’PLOT  ’  CONFUTES  tflH,  HflX,  ROD  FILLS  ARRAYS  FOR  PLOTPT 


THIS  SUBROUTINE  COffOTFS  NIN,  HAX,  AND  TILLS 
WRAYS  OF  TOTAL  DERAltD,  TOTAL  REDUIRENEHT  AND 
PURCHASES,  FOR  ’ PLOTPT  \ 

SUBROUTINE 

FORTRAN  IU 

SINGLE 

WTROH 


C 
C 
C 

C - — 

C 

C  FUNCTION: 

C 
C 
C 

C  STATUS: 

C 

C  LANGUAGE: 

C 

C  PRECISION: 

C 

C  REQUIRE!  SUBROUTINES: 

C 

C  LAST  UPDATE: 

C 

C 

SUBROUTINE  PLOT!  X,N,ISPOT,  SORT, LAST  I 
CONNON  /PLOTER/  HIGH, LOR, AUHST, SCALE 
C0TI10H  /FIXPLT/  SHITCH,HIGHUIll).«LOH(18) 
REAL  LOR 

DIHENSION  ISPOT(Nl,X(N) 

LOGICAL  SORT 

IFISUITCH.LE.9. OR.SUITCH.GT.il)  GO  TO  5 
LOR=ULOUtSHHCHI 
HIGtHTIGHUISUITCH) 

GO  TO  31 
5  LOU=X(N) 

HIGH=X(  1 ) 

IF(SORT)  GO  TO  31 
L0U=X(1) 

DO  II  1=2, N 

IFILOH.CT.Xtin  LOH=X(I) 

IFIHIGH.LT.Xl  D)  HIGH=X(I) 

11  CONTINUE 

31  CONTINUE 
IPONER=f 

IF(HIGH.LE.LOU)  RETURN 

r. .......  ,  ..  ... 

.fill’ -GALE* 

!r?»" 
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IF(RANGE.LT.D)  IP0HER=IP0WER-1 
SCALE=lfl.WiilRAI1GE-IP0WER) 

11  COttllNUE 

FSCftL£=fllMT ( SCALE  ♦  1.99) 
lF(XTLE.GT.l.J.AND.SCALE.LT.t.5)  FSCfH.E=1.5 
IFISCflLE.CI. 2.1. DM. SCALE. IT. P.3)  FSCSLE=2.5 
32  SCALE=tD.DInrtIPOHER)tf  SCALE 

KOB/SCALE 
IF(LOI.LT.I.H)  1=1-1 
ALOWST=I«SCALE 

IF(LOW.EQ,l..AHD.SCALE.LE.l.)  ALCWST4. 
IFKHIGH-ALOWSTI/SCALE.LE.LAST)  GO  TO  39 
FSCAL£=fSCALE+l 

IF(F$CAL£.GT.3.5.AND.FSCALE.LE.1S)  GOTO  32 

IFIFSCALE.LE.3.5!  GO  TO  33 

FSCALE=1.5 

IPOHER=IPOWER+! 


IF(RANGE.LT.I)  [POHER=IPOHE5-2 
GO  TO  32 

33  FSCALE=FSCALE-<.5 
GO  TO  32 

39  DO  40  1=1,  N 

SP=(KII l-ALOWST )/SCBLE 

40  ISPOKIKASMFIXtSP) 

RETURN 

END 

ELOCX  MTfl 

CONNON  /FIXPLT/  SWITCH, H1GHVI U),V10WI  10) 

DATA  SHITCH/0/ 

DATA  VL0W/1O*./ 

DATA  HIGHV/100.  ,310. , 1001., 5000., 13000 . ,50101. , 110000. ,500000. , 
1  1000000., 5000000./ 

END 


C 
C 

C - 

C 

C  FUNCTION: 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

r 

C  LANGUAGE: 


SETUP  ’  INITIALIZES  OVERVIEW  NODULES 


THIS  SUBROUTINE  SETS  UP  THE  NECESSARY 
IICT10NARIES  FOP  USE  BY  ANY  OF  THE  OVERVIEW 
NODULES.  IT  GREAT! S  DICTIONARIES  FOR 
(1)  FE1ERAL  SUPPLY  GROUPS,  12)  FEDERAL  SUPPLY 
CLASSES,  (3)  NISSION  DESIGN  (HD)  WEAPON 
SYSTEHS,  AND  (4!  NISSION  DESIGN  SERIES  (NDS) 
WEAPON  SYSTEHS.  IT  ALSO  CREATES  THE  CROSS 
REFERENCE  TABLES  THAT  RELATE  FSC’S  TO  FSG’S 
AND  HDS’S  TO  HD’S.  OPTIONAL  REPORT  FLAGS  ARE 
SET.  USER  SELECTED  FSC’S,  HDS’S,  (DID  RLC’S  ARE 
READ  IN  AND  VERIFIED. 

FORTRAN  IV 


C 

C  REQUIRED  SU8ROUTIICS:  HEDDA,  STORTV,  ISTORE,  IFETCH,  PAGE 
C 


C  VARIABLES: 

ITEH 

TEMPORARY  BUFFER  FOR  INPUT 

C 

TITLE 

TEHPORARY  BUFFER  FOR  INPUT 

c 

JTITLE 

FANNER  PAGE 

C 

IDATE1 

I>04l  ASSET  CUT-OFF  DATE 

c 

IDATE2 

.OB  SUBHISSION  BATE 

c 

INANE 

'OB  SUBMITTER 

r 

FLAG 

"RESS  PRINT  FLAG 

t 

WBULE 

:  -  OVERVIEW 
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c 

2  -  MISSION  DEGRADATION 

c 

3  -  PIPELIBE  FILL 

c 

4  -  READINESS 

c 

I CLASS 

!  -  UMCLASSIFIO 

c 

2  -  FOR  OFFICIAL  USE  ORLY 

c 

3  -  CLASSIFIED! CONFIDENTIAL) 

c 

4  -  CLASSIFIED! SECRET) 

c 

5  -  CLASSIFIED! TOP  SECRET) 

c 

FLAGS 

OPTIONAL  REPORT  SNITCHES 

c 

JYEARS 

NUMBER  OF  YEARS  TO  RUN 

c 

IYEARS 

FISCAL  YEARS  IE.G.  1381,  1382) 

c 

IPDAYS 

PEACE  BAYS  TO  RUN  EACH  YEAR 

c 

IHDAYS 

WAR  BAYS  TO  RUN  EACH  YEAR 

c 

IIUKT 

BUDGET  CONSTRAINTS  EACH  YEAR 

c 

J1,J2,J3 

FSG  1ICTIORARY  TARES 

c 

K1,K2,K3 

FSC  DICTIONARY  TABLES 

c 

L1,L2,L3 

MB  I1CTI0NARY  TABLES 

c 

Nt,N2,!t3 

MBS  DICTIONARY  TARES 

c 

JCOURT 

FSG  DICTIONARY  ENTRY  COUNT 

c 

KCOUNT 

FSC  DICTIONARY  ENTRY  COUNT 

c 

LCOUNT 

NB  DICTIONARY  ENTRY  COUNT 

c 

NCOUNT 

MBS  DICTIONARY  ENTRY  COURT 

c 

JKOW1T 

NlflOER  OF  FSC’S  IN  EACH  FSG 

c 

LXOUNT 

IMBER  OF  HDS*S  IN  EACH  HI 

c 

IFXREF 

FSC  TO  FSG  CROSS  REFERENCE  TARE 

c 

HDXREF 

(IBS  TO  Id  CROSS  REFERENCE  TARE 

c 

NUIfSC 

»  OF  FSC’S  TO  BE  USED  IN  A  RUN 

c 

Runus 

1  OF  (IBS’S  TO  R  USU  IN  A  RUN 

c 

NUHALC 

1  OF  ALC'S  TO  K  USO  IN  ft  RUN 

c 

LSTFSC 

INDICES  OF  FSC’S  FROM  K1  TO 

c 

IE  USED  IN  A  RUN 

c 

LSTRBS 

INDICES  OF  IBS’S  FROM  Ml  TO 

c 

K  USED  IN  A  RUN 

c 

LSTflLC 

NEC’S  TO  tt  USO  IN  A  RUN 

C  LUST  UPDATE: 

C - 

SUBROUTINE  SETUP! FLAG) 

C 

LOGICAL  FLAGS, FLAG 

INTEGER*  ITEB(4),ANSIO,TITlEl5),JTITlE!2l),iniTl£l4, 4) 

DIMENSION  IPINY14I) 

C 

cannon  /blocxe/  h»tck4 ) , imtq* 4 i, imwEt 6)tnoiuxv icmss 

COMOH  /ROttf/  FLAGS!  7 1 

COMM  /ROCK/  DELTA!* ),RHIN(44V, UMAX!*) 

COMOH  /ROCXH/  JYEfl8SflYERRS(9),  IPDPfS(9),lHlfiYS{9),IBUlGT!9) 

cannon  /rqoj/  jki,  5*1, J2(  5ii,j3(  5*i,j«kbs,jlenth,jfree 
COMON  /ROOK/  Kl 1 1 , 2DI ) , K2( 2ID ) , K3( 2*0 ) ,  CHORDS,  KLEHTH,  CFREE 

cannon  /root./  lki,  711,121 7*1,131  ti  i,uork,ll£nth,lfre 
CONNOR  /ROGER/  HU4,20l)lK(2H),H3(2N),NMnSlHLENTHliniE 
COMON  /ROQCH/  LSTFSC!2ll),LSTIUS(2DC),LSTRC(5),(!tXREr(7*,2l), 
1  IFXREF(5l,21]>JC0IM,EC0UNT,LC0UfT,IIC0UHT, 

1  NUMBS, IMf SC, IM«lC,JOUHTl  SII.LKOUNT!  71) 


DATA 

IPBNY/17H,*, 

,1,311,1811/ 

DATA 

IIZERO  / 

2Htt  / 

BATA 

HONE  / 

4NI0NE/ 

DATA 

IflLL  / 

4HALL  / 

BATA 

IYES  / 

4HYES  / 
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DATA 

KTITLE 

/’ 

SH’,,OR’F’,,AU./’,’IUY  ', 

1 

’,’HIV,'  DEG’,'.  ’, 

f 

P1',’PELI','NE  F’ , ’ILL 

» 

V READ’,  IKES’, ’S  »/ 

DATA 

JTITLE 

/* 

OUE’ ,’RUIE’ , *11  NO’, ’Da  ’, 

J 

SHVORTFVALL/VWY  ’, 

» 

’,’  NCDVAE  ’,'  ’, 

1 

« 

»  *  i  •  i  i  i 

i  t  >  > 

ii  *  <  •  »  t/ 

i  •  i  ' 

c - 

C  READ  BATES,  SUDHITTER,  MODULE,  AN!  CLASSIFICATION.  PRINT  HEADER. 

t - 

REAI  (10I1WTE1  - 

HIlEil6r8877U19ATEl  * 

88771  F0RHATI1X,4A4) 

REAB  (I5,7II)DUHHY 
REAI  (0S,7tl)IWHt£ 

REAI  (I5,7II)IDATE2 
REAI  (05,701  IHIHHY 

REAB  l 15, 78 1 (MODULE  • 

REAI  115,711 IICLASS 
X  =5 

DC  1  1*1,4 

JTITlEtK)=KTITLE(I,B01UL£) 

K  =«  ♦  l 

1  CONTINUE  • 

X  -13 

DO  2  1=1,4 

jriTLEIX»=IIATE2II) 

X  =X  M 

2  CONTINUE 

X  =17  • 

10  3  1=1,4 

JTITl£lX)=lNRHE(n 
X  =X  ♦  I 

3  CONTINUE 

IHF18G1CALL  HEDDA(I6,1,80,JTITLE) 

INITIALIZE  ANI  PRINT  HI  AN!  MBS  DICTIONARIES  * 


CHORDS-'  1 
LLEtTH=  70 
WORDS--  4 
NL£NTH=2!I 

CALL  STORTUI  LI ,  12,  L3,U0RDS ,  l  LENTH ,  LFREE )  • 

CALL  ST08TU(H1,K,IQ,HH0RIS,NLENTH,HFREE) 

LC0UHT=0 
HCOUNT=0 
It  REAI  dine 
WITEC06, 88771 IITEN 

IF(ITEMl)  ,EQ.  ID0NE1G0  TO  14  • 

CALL  IST0RE(»51l,ie,Nl,N2,N3,NW)RlS,HL£HTH,HFREEl 
fOCOJHT=#COW1T  ♦  I 

CALL  IFETCHIIll  ,ie,Nl,IB,H3,IWRIS,NlEHTH,Nia.K) 

BECODE(ITEN,712)NI 

CALL  IFETCHUI2  ,NI  , LI, L2,L3,LW»K,LL£HTH,  INDEX) 

CO  TO  13  • 

12  CALL  IST0RE(t51t,NB  ,Ll,L2.L3,li40RJS,Li£irm,LFREEI 
LCOUNT=LCOUNT  ♦  1 

CALL  IFETCHdll  ,NJ  , LI, L2,'  3,1  40RDS, llENTH, INDEX) 

13  LXOUHTl  INDEX  HXOUHTI  INDEX!  -  t 
HBXREFf  INDEX, LXOUNTt  INDEX)  1=^  % 
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14  in. NOT.  FIX  ICO  TO  10 
CALL  PRCE1IO 
*111116,811) 

90  IS  I=l,LC0UHT 
n  =LXQUHTII) 

UR1TE(I6,811 )1,(L1(J,I),J=1, LWOSDS), 
i  ((NlU,HlXREF(!,Kt),J=l,2),K=l,N) 

15  CONTINUE 

C— - 

C  IHITIflLIZE  RHI  PRINT  FSC  Ml  FSC  HCTIONflRIES 
C — - - - - - 

16  JURIS2  1 
JLENTH=  SI 
KH0R1S-  1 
KLENTMil 

COLL  ST0R1V(J1,J2,J3, JURIS,  JLDITH, JFBtE ) 

CULL  ST0RTU(Kl,R2,K3,Ui0RISlQiHni,KrREE) 

JCOUHT=t 

KCOUNT=t 

21  REM  (I8,7I4,E®=24)ITEH 
KCOK1ITOI,  721)101* 

ifiich*  .eq.  iizemigo  to  21 

CALL  ISTOREl  1521, ITER, Kl,X2,K3,l(ilORlS,KIIHTH,l(FREE) 

KCOUNT=XCOUNT  *  1 

CALL  IFETCH($2I  ,ITEH,Xl,K2,X3,l3IOR9StXLDlTH,IFSLtt) 

KCOK(  ITER,  721 IIFSC 

COLL  IFETDH  $22  ,  IFSG, J1,J2, J3,JU0RIS,  AEHTA,  IRKX) 

GO  TO  23 

22  COLL  lST0RE(tS21,IFSC,Jl,J2,J3,JH0R]S,JLEinH,JFREE) 

JCOONT-XOUNT  *  1 

CALL  IFETCH($2I  , IFSG, Jl, J2, J3, JUORtS,  JLEHTH,IHKX) 

23  JK0UHT1  IHKX  )= JKOUNT 1 IIUEX )  ♦  1 
IFXRETt  IHKX,  JKOUHTt  IlOGt)  )=IFSLOC 
GO  TO  21 

24  CONTINUE 
CCC24  CLOSE! 18) 

IFU10T.  FlflGlGO  TO  26 
COLL  PDGE1I6) 

*ITE(I6,82I) 

N  25  I--1,X0UNI 
N  =JKOUHTU) 

*ITE1I6,821)I,1J1(J,I),J=1,JH0RDS), 
i  ((K1U,IF/REF'I,XH,J=1,1),K=1,N) 

25  CONTINUE 

C - - 

C  REM  Ml  PRINT  SENSITIVITY  MXYSIS  PflfflNETERS 
C - * 

26  OTFUCKU.  PHGEU6) 
kd)B  1 15, 711) WHY 
*111(16,888) 

10  31  1=1,41 

REM  (15,781 1TITIE, KLTfl(  I ) ,RNINU ) ,  RIIRXt  I ) 

IF(  IPMm  I ).  EQ.  1 1HRITE1  «6, 881  )TI  TLE,  KLTIH I )  ,IWIH(  I ) ,  RIIRXf  I ) 
IFIRHIN(I)  .IT.  I.!IIII1)RH1N(I)=!.IE-3I 
IFfRMDtm  .IT.  t.llf til  IRNfiXt  I  *=l.lE*3t 
38  CONTINUE 

C- — — - 

C  REM  Ml  PRINT  USER  OPTIONfll  REPORT  r  iECIION  FOR  THIS  RUN. 

i '  —  . .  . .  — 


IKITE(86,88c) 

ROB  (IS,70I)BUI«(Y 
BO  35  1=1,7 

FLflGSm=.FRLSC. 

REflB  115, 78WITLE,  ANSWER 
WITE(86,883)TITL£,AMS)0 
lF(flflS«R  .EB.  lYES)FLflGS(n=.T?UE. 

35  CONTINUE 

REM  USER  SCENARIO  BECISIONS  FOR  THIS  RUN 

ROB  (85,788 IIUNNY 
JYEflRS=4 

44  REflB  (45,7t2)IYEflR,I,J,r 
IFIIYE1#  .EQ.  IBWCIGO  TO  51 
JYEf*S-JYEflRS  ♦  1 
DECOBEl IYEflR,783) JYEAR 
IYEflRS(JYEARS)=JYEAR 
IPDAYS(JYEARS)=I 
IHBBYSf  JYCflRS )=J 
IKIKTI  JYEflRS)=X 
GO  TO  41 

ROB  M1B  PRINT  USER  NBS. SELECTION  FOF  THIS  RUN 

51  IFIFIflGICflLL  PAGE! 06) 

REM  (05,7I0)«JNRY 

NUHHDS=8 

»ITEU6,858) 

51  RER1  (85,711,011=61 1ITEN 
IFlITEN(l)  .EQ.  Ifll  )G0  TO  58 
IFdTEN(l)  .EQ.  1B0NEIG0  TO  68 
Cftl  IFETCHU56  ,ITEH,N1,N2,K,HWRBS,HIEHTH,IN1EX) 
HUHHK=HUHHB$  ♦  1 
*1TE186,351)NUHHBS,ITEN 
LSTHBS(HW»IIS)=lfl8EX 
GO  TO  51 

56  CALL  IFETCHl 0551, ITEH,L1,L2,L3,LH0RDS,LLENTH,  INBEX) 

N  =UCOUHTl INBEX) 

DO  57  1=1, N 

W»IS=HUNHBS  ♦  1 

HRITE(16,851)NUNNBS,(NlU,H])XREJ'nNBEX,I)),>l,NH0RBS) 
ISTNBSINUNHIS  )=HBXREF  ( INBEX,  I ) 

57  CONTINUE 
GO  TO  50 

58  DO  59  I=1,HC0UHT 

LSTNJS(I)=I 

59  CONTINUE 
NUHHBS=NCO(JflT 
HRITE(16,852)NUNNBS 
GO  TO  50 

ROB  ANS  PRINT  USER  FSC  SELECTION  FOR  THIS  RUN 

61  IF(FLAG)CALL  PflGEI86) 

REM  (85,781 1BUNHY 
NUNFSC=8 
(KITE!  86, 868) 

65  ROB  (85,718,ENB=78)ITEN 
IF(lTENd)  .EQ.  [ALL  ICO  TO  68 
IF(ITENd)  .EQ.  IBONE)GO  TO  78 
CALL  IFETCHl 066  ,ITEH,Kl,K2,K3,XH0R*>lf' ENTH, INBEX) 
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lUrSMMTSC  ♦  1 
URIIE(U,851)IMfSC,ITDl 
LSTFSC(HUHrSCj=IflKX 
GO  TO  65 

66  CALL  IFETCHI 1564 ,  ITEM, J1 ,  J2,  J3,  JIJ0R5S,  JLDfTH,  IlflEX I 
N  =JKOUHT(  IIUCX) 

SO  67  1=1,  It 

!MFSC=flUffSC  *  1 

*ITTU6,851  IIMTSC,  IKK  J,  IDREFf  IlflEX,  I ) I,  J=l,n«RBS) 
LSTFSC1  IWffSC  )=IFX8ET  I  INSEX,  I ) 

67  COfTMUE 
GO  TO  65 

60  SO  69  I=l,KCOUirT 
LSTFSCt 1 )=1 

69  CONTINUE 
IUFSC4C0UDT 
MRITE(I6,852)WRFSC 
GO  TO  65 

C— - 

C  ROD  fill  PRINT  USER  HLC  SELECTION  TOR  THIS  RIM. 

C - 

7i  influx 

REfli  (15,  Til  imr 

71  REM  (15,711, Q0=9l)IflLC 
IFIIRLC  .Eg.  I ALL  ICO  TO  71 
IF(IRLC  .EQ.  ISONETGO  TO  91 
HUflLC=fl«fllC  ♦  1 
IFHMRC  .GT.  11G0  TO  72 
IFIFIOGICOLL  PNGEII6) 

HRITEl 16,871 1 

LSTflLC(IUflLC)=lRLC 
GO  TO  71 

91  RETURN 

C - 

C  ERROR  coniTions 

c - 

511  HRITE(I6, 911 (ITEM 
GO  TO  II 

511  URITE(I6,911 IITEN 
GO  TO  II 

521  HRITEII6, 921  IITEN 
GO  TO  21 

521  HRITE(I6, 921 IITEN 
GO  TO  21 

551  *1TE(I6, 951  IITEN 
GO  TO  51 

561  *ITE(I6, 961  IITEN 
GO  TO  65 


C  IlfUT  FORfflTS 


711  F0RHRTUX,6fl4) 

711  F0RNRT11X, 14) 

712  FORfflTC  1X,A4,2(  14,3X1, 17 ) 

713  F0RlflT(I4) 

714  F99RTt384,R3) 

711  F0RNHT(1X,3R4,{I3) 

712  F0RlflT(2X,IH) 

721  F0R)flT(2X,R2) 

721  FORNRTTISS) 
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781  FORUM  1X,5R4,  1X,F9.2,2(  IX, F5.  1  1 1 
781  F0RHRT(1X,5R4,7X,R3) 


C  OUTPUT  FORHBTS 

c - 

811  FORHHTI ’INIS  TO  HI  CROSS  REFERENCE  TRJLE:’,//) 

911  FORM!  1 14,  IX, fM,  1S(  1X,R4,83 ) 9X,  151 IX,  84, 83) ) 

821  FOHMrClFSC  TO  FSC  CROSS  REFERENCE  rflSL£:',//) 

321  FORM)!!  14,  IX, 84, 211 1X,84) ) 

851  FORHBTl'ITKSE  KBS  HILL  BE  USD  18  THIS  RUB  OF  THE  NOBEL:’,//) 

851  F0RNR!II4,1X,384,B3) 

952  FORNRTl ’ML ’,13,’  KILL  K  USEI.M 

861  FORHHTl’ITHESE  FSC  HILL  IE  USO  IN  THIS  RUN  OF  THE  NOBEL:’,//) 

871  FORNRTl ’ITIESE  RLC  HILL  BE  USE1  IN  THIS  RUN  OF  THE  NOBEL:',//) 

881  FORHHTI ’1B8TR  CONTROL  SECTION:’,/, 

i  » - i  /, 

«  ’  ITEN  IIUEL  P8R8NETEJ  '  FACTOR  NIN  NfiX’,/, 

381  FORHHTI IX, 584, 1X,F9.2,2( IX, F5. 1 ) ) 

882  FORMTl’IOPTIOHRL  REPORTS  REQUESTED:’,/, 

i  i - '  | 

883  F0RHAT(1X,584,7X,R3) 

i - 

C  ERROR  FORHRIS 

C - 

911  FORNRTl’  CflNNOT  STORE  ’,384,83,’  IN  HBS  8ICTI0H8RV’) 

911  FORNRTl’  CflNNOT  STORE  ’,384,83,’  IN  HI  BICTIONRRY’) 

921  FORNRTl’  CHNffiJT  STORE  ’,384,83,’  IN  FSC  IICIIOHRRY’ ) 

921  FORNRTl’  CflNNOT  STORE  ’,384,83,’  IN  FSC  BICTIONRRY’) 

951  FORNRTl’  C8NN0T  Fill  ’,384,83,’  IN  HB  OR  HIS  BICTIONRRY’) 

961  FORHHTI ’  CflNNOT  FINB  ’,384,83,’  IN  FSC  OR  FSC  BICTIONRRY’) 

END 

C  ’INPUT’  RE81S  OUERUIEH  B8TR  BftSE 

C 

C - 

C  FUNCTION:  THIS  SUBROUTINE  RE8BS  THE  OUERUIEH  B8TR 

C  BftSO  RNB  SELECTS  RECOR1S  BASE  ON  USER 

C  SELECTION  CRITERIA  FOR  OUTPUT  TO  8  TEMPORARY 

C  WORKING  FILE. 

C 

C  REQUIRED  SUBROUTINES:  RANGE,  OUREA1,  I FETCH,  REPT15 
C 

C  L8ST  UPBRTE: 

C - 

SUBROUTINE  INPUTIH) 

C 

LOGICAL  FL8CI1,FU)G12,FL8Q13,FL8CI4,FL8G15,FU)C16,FL8G17 
LOGICAL  REJECT, FL8G,I0FL8C,FLRGI 

INTEGERS  LIST(232),HRR8Y(14),ITENP(21I) 

INTEGERS  N8TCH14) 

C 

CONNOR  /ILOCXC/  NSNl4),COST,lfET,IPLT,IOST,BP,BP,8CP,BCP,ONBCP, 

i  0«CP,FR,URCOST,IBRT,IDRT,IIL,IILS,IILU,IILO, 

■  NEHU8R(11),I0PR(200) 

COWON  /BIOCXF/  FLAG11,FLAG1E,FUWU3,FLBG14,FLAQ15,FLAGI6,FLAG17 

COWON  /BLOCXG/  BELTB(4II,RHIN140),RNRX(41) 

COIWN  /BLOCtt/  Xll 1, 211  ),K2( 211 ) , K3( ) , KHORIS, KLENTH, JCFREI 

CONNOR  /BLOCXH/  N114, 211), H2t2ll),H3(2ll), MORIS, NLENTH,RFREE 

CONNOR  /BLOCXH/  LSTFSC(211),L5TN!S(21I),LSTRLC(5),NBXREFI7I,2B), 

l  IFXREF  (50,20),  JCC'JNT,  XCOUNT,LCOUNT ,  NCOUNT , 

*  IM1HBS,HUHFSt , N’P’BLC, JXOUITl  5t),LKOUNT(  71) 


c 


canon  /mm/  f  i lli  ( 63 ) ,  swpie, srwhr,  uhs^ce ,  wsifflR,  i irrs,  jiys 

COMM  /M.0CXZ/  IORBtRf  17 ),  3R( 4, 17), IflSSETl  15) ,RSS£TSI 4,15) 

EQUIVALENCE  lLISTd),N$«) 


C 


DATA 

HUM 

/ 

4H  / 

BATA 

I  ALL 

/ 

4HALL  / 

DATA 

FLAG1 

/ 

.FALSE./ 

BATA 

IOFLAG 

/ 

.FALSE./ 

DATA 

mac 

/ 

4HMNE/ 

HRITE{l6,8tl) 

C  SET  COUHTESS 


J  =0 

K  =1 

a 

L  A 

LL  A 

H  A 

Ml  A 

N  A 

m  A 

NUORK=flUIWS  t  32 

SRVPCEsl.l 

SRUWH.I 

UNSPCE4.I 

UNSHfNft.l 

SPCTP  =IELTBd2) 

SPCTH  =BELTfl( 13) 

UPCTP  -IELTfl(14) 

UPCTA  -IELTAU51 
0HPCT=KLTftC16) 

LEUEL  =II!T(1ELTHC  171) 

NNTHlP=INT(IELTRd8)) 
m  =IHT( DELTflt 19) ) 

RYPCT  =IELTfl(28] 

IYPCT  =8ELTR(29I 
EYPCT  =KLT8(3I) 

REM  (IS,7ll)nMfY 
REM  (I5,7I1HFILE 
IFIIFILE  .EQ.  Iflli)10FlflG=.TR!JE. 

IFdFILE  .EQ.  IALLIREA!  U5, 731  IPUflHY 
IFINAX  .EQ.  DWB  =109980 
II  CALL  OVREMt  IALC,NSN, icost,  ialt, iflt,  iost,  IIEHHD, 
i  IIP,  INI,  IDRT,  1KP,  IKF,  IECOK,  IURC, IORBER, 

i  IRSSET,ICMS,ITE3f  ,FIFS) 

IFIFIAG1G0  TO  91 
inn  .EQ.  IWtlCO  TO  91 
II  A*  1 
REJECT-.  FUSE. 

C - 

C  am  KNAN1  RATE  FOR  HISSING  C0DEI99999) 

C - 

IFdKm  .EQ.  99999IG0  TO  515 
C - 

c  am  Kara  rate  for  zero. 

c - 

11  IFdKm  .EQ.  DGO  TO  596 

C - 

C  CHECK  ESSENTIALITY  LEVEL 

r - 


12  IHIECOK  .Cl.  LEVEL  )GO  TO  5 10 

C - 

C  CHECK  APPLICADIL1TY  TO  USER  SELECTEE  SC  LIST 
C - 

15  IFIMUMFSC  .EQ.  KCOUHTIGO  TO  28 
DEC0DE(KSN(I),7!0)1FSC 

CULL  I FETCHl  1515,  IFSC, K1 , K2,  K3,  KHOR1F ,  KLENTH,  1NIEX 1 
DO  16  !=1,NUHFSC 

IF! INDEX  .EQ.  LSTFSClinCO  TO  ?0 

16  CONTINUE 
GO  TO  515 


C - 

C  CHECK  APPLICADILITY  TO  USER  SELECTEE  (IDS  LIST 

C - 

20  I  SUN  =0 
DO  24  I=1,NU!WS 

IQPA(I)=ITENPILSTNDS(I)) 

13U!  =ISUHMQPAII) 

24  CONTINUE 
1FIIS1IH  .EQ.  OIGO  TO  520 

25  IF((M1ALC  .EQ.  I  ICO  TO  2? 

DO  26  tt.NUNALC 

IFU&C  .EQ.  LSTALCIDIGO  TO  39 

26  CONTINUE 
GO  TO  525 


C - 

C  CHECK  AGAINST  NSN  INPUT  LIST. 

C - 

27  IF(IOFUG)GO  TO  31 
IFIFLAGDGO  TO  2? 

28  REAS  105,78! 1NATCH 
IFfHATCHUI  .EQ.  IDONE1GO  TO  90 

29  DO  31  1=1,4 

IFIHSN(I)  .LT.  NATCHIDIGO  TO  32 
IFlHSNtl)  .GT.  NATCHIDIGO  TO  33 

31  CONTINUE 
FLTO1  =.FfiLSE. 

GO  TO  30 

32  FLAG1  =.TRUE. 

REJECT.  TRUE. 


C- 

C 

C- 

C 

C 

C 

C 

C 

c- 


INI  =NN  ♦  1 
GO  TO  30 

33  IN!  =NN  M 

GO  TO  28 

30  IFIRE JECTIGO  TO  10 
N  =«♦  1 


COHUERT  DATA  ELEHENTS. 


COST  l  URCOST  FACTORS  MERE  CHAKTI  FRON  0.11  TO  1.00 
OCR  FACTOR  HAS  CHANGED  FRON  0.01  TO  0.0901. 

FOR  NRUY  NODEL. 


COST  =RAHGEl I ICOST 
IflLT  =RANGEIIIALT 
IPLT  sRHHGEUIPIT 
IOST  =RANG£((I0ST 
FR  =SANGEIIIEEHffl 
DP  =RPNGE( 1 IDP 
I DPT  =*ANGE((ID8T 


«  1.00  *  DELTA! 
l  1.00  i  DELTA! 
«  1.00  *  DELIA! 
i  1.00  i  DELTA! 
i  l.E-96  i  DELTA! 
*  0.31  *  DEI '31 
l  1.00  i  DEL 'A' 


1) ),RHIN!  D.RHRXI  D) 

2) 1, RAIN!  2I.RHAX!  2)) 

3) ),RHIH(  3),RNAX(  3)1 

4) ),RNIN!  4),RNA3(l  4)) 

5) ),RNINI  5),RNAXI  5)) 
>1,RH!N(  6),RNAX(  61) 

:t|,RNIN(  7),RNRX(  7)) 


* 


* 


* 


t 


» 


* 
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IDRT 

=SANGE((iWT 

i  1.01 

i  DELTA!  8) I, RAIN!  8l,RHfHI  8)) 

JCP 

=RAHGE(dBCP 

i  Ml 

i  DELTA!  9H, RAIN!  9),RHAX(  9)) 

DCP 

=8RHG£(IIDCP 

H.ll 

l  DELTA! 11 1), RAIN! 1I),RHRX(1I)) 

DCP 

=ICPi  Ml 

URCOST =RAHG£((IURC 

i  1.11 

i  DELTA!  11 II, RAIN!  11 1, RHAXI ID) 

BP 

=1.1  -  IP 

OHSCP 

=1.1  -  BCP 

ONBCP 

=1.1  -  ICP 

c - 

C  INITIALIZE  SERVICEABLE  AND  UNSERVICEABLE  ASSETS 

C - 

SP  =IRSS£TI1)  ♦  IASSET12)  ♦  IASSETI3) 

UP  =IASSETI4)  ♦  IASSET15)  ♦  IRSSETI6)  ♦  IRSSETI7)  +  IASSET18) 

91  =1RSSET(I4)  ♦  I ASSET! 15) 

UK  MASSETdl) 

IILSP  =INT(SP  i  SPCTP  ♦  .5) 

IILSU  =INT!SU  l  SPCTU  ♦  .51 
IILUP  -INI! UP  i  UPCTP  ♦  .5) 

IILUH  =INT(UU  i  UPCTH  ♦  .5) 

IILS  -IILSP  ♦  IILSU 
I  ILL)  -IILUP  *•  HUM 
III  =IILS  ♦  IILU 
SRVPCE=SRVPCE  ♦  IILSP  *  COST 
SRVHAR=SRVMI!  ♦  IILSU  ■  CAST 

uhspce=uhspce  *  hlup  i  cost 
unsuar=uhsrfr  *  hum  i  cost 

DO  35  1=1,15 

HUHKS=IASSET(I) 

IFINUHKS  .1C.  0)ASSETSll,I)=ASSETSd,I)  ♦  1 
ASSETS!2,I)=ASSETS(2,I)  ♦  NUMBER 
ASSETS!3,I)=«SSETS13,I)  ♦  HUNKS  i  COST 
ASSETS!  4, 1  )=ASSETSl  4, 1 )  ♦  HUNKS  *  URCOST 
35  CONTINUE 

C - 

C  INITIALIZE  ON  OKIES  ASSETS 


SUN 

=1.1 

DO  41 

1=1,17 

NUHIER=I3RIER(I) 

IFIIRINBES  .NE.  l)ONORIRIl,I)=()NORDR(l.n  ♦  1 
QHORM)(2,I)=OHORIR(2,1)  +  NUMBER 

0N0RDR!3,I)=0N0RDR(3,I)  ♦  NUHKS  «  COST 
ONORDR(4,!)=ONOS1R(4,I)  *  HUNKS  i  URCOST 

SUN  =SUN  ♦  HUHIER 

41 

CONTINUE 

IILO 

=IHT(SUN  *  ORDPCT  ♦  .5) 

IIL 

=IIL  +  IILO 

All  IN  APPROPRIATION  TEAR,  DUDttT  TEAR,  EXTENDED  TEAR  BUYS 

HL 

=IIL  *  INTOEJWARtl)  l  ATPCT  +  .5) 

IIL 

=IIL  ♦  INT! NERVIS! 2)  «  BYPCT  ♦  .5) 

IIL 

=IIL  ♦  INT1NEMUARI3)  i  EYPCT  ♦  .5) 

RRITEII1)ILISTII),I=1,HU0RDS) 

IF  (FIAG151CALL  REPT15IIEC0DE) 

GO  TO  II 

91  «ITEtl6,89l)N,l£Ua,J,M(,)(,L,LL,HH,NN,N 
RETURN 

C - 

C  ERROR  CONDITIONS 

C - 

515  REJECT=. TRUE. 


143 


USITEi  96, 9(1  )l(Stt,  tDOttt 
GO  TO  SI 

516  KK  =*K  +  1 
R£JECT=.TRUE. 

GO  TO  12 
510  J  =JM 
REJECT=.TRIE. 

GO  TO  15 
515  K  =K  ♦  1 
RE^CT=.TRU£. 

GO  TO  21 

52*  L  =L  t  1 
REJECT=.TRUE. 

GO  TO  25 

525  LL  =ti  ♦  i 
REJECT^  TRUE. 

GO  TO  27 


iiput  rowmis 


701  F0RHATHX,3A4,A3) 

711  F0RHATIA4) 

OUTPUT  FORHATS 

811  FORHATT’OBflTA  IRSE  PROCESSING  SECTION:’,/, 

i  ' - ’,//) 

891  FORHRTI’ISUHHARY  OF  RASTER  STOCK  NUMBER  SEUCHOH:'./, 

i  i _ i  // 

i  '  TOTAL  IfSIJ’S  PROCESSES  IN  BATA  BASE  ’  ’=‘,16,/, 

*  •  usii's  with  EssESTimm  leuel  >  m  Mt,3x,,=,li6,/! 

i  ■  HSU’S  Him  BEHAHB  RATE  OF  ZERO  =*,I6,/f 

*  ’  HSH’S  HOT  flPPUCflUE  TO  FSC  USO  IH  THIS  RUN  =*,16,/, 

«  *  HSH’S  ROT  APPLICABLE  TO  IDS  USES  IH  THIS  RUN  =*,I6,/, 

«  '  HSH’S  HOT  APPLICABLE  TO  ALC  USO  IH  THIS  RUN  =*,I6,/, 

i  *  HSH’S  HOT  APPLICABLE  TO  KSH  LIST  IH  THIS  RUH  =*,I6,/, 

«  *  HSH’S  IH  HSH  LIST  BUT  HOT  IH  00ERUIEH  DATRBRSE=*,I6,/, 

i  *  TOTAL  RSR'S  SELECTE1  FOR  THIS  RUH  =*,I6) 


911  F0RHATUX,384,A3,’  REXCTES,  DEMI 
END 

’  OUREflB'  REABS  OUERUIEH  MTR  BASE 


FUHCTIOR: 


REQUIRES  PJHCTIQHS: 
UflRlflBLIS: 


LUST  UPBfiTE: 


THIS  SUBROUTINE  READS  THE  OVERVIEH  BATH  BASE; 

IT  CRH  BE  USES  BY  (Iff  FORTRAN  RPOGRAR  FOR  THIS 
PURPOSE. 

BECAUSE  OF  SYSTEM  LIHITATIOHS.THE  QUERVIEH  DATA 
BASE  EXISTS  AS  A  PACIEJ/COfllEHSEl  BINARY  Fill. 
OUREAl’S  PRIMARY  FUNCTION  IS  TO  UNPACK  IT  FOR 
PROCESSING. 

IPQIHT 
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SU9R0UTIHE  OURERK  IRLC,HSH, 1  COST,  IRLT ,  SPIT,  10ST,  I9ENHD,  IIP,  • 

«I9RT, IBRT,  IMP,  IMP,  IECODE,  IURC,  I  OR  Jf  R,  IflSSET,  NEMOUT,  iQPR.FlK) 

LOGICa  FUG 

INTEGER«4  HN4) fIQRKR(  17),IASSETI  151, IQPHI200 )fICU0UT( II ) 

BfiTft  IEHD  /  4H9W9/  # 

W  1  1=1,17 
I ORDER! 1 1=4 

1  CONTINUE 
90  2  1=1,15 

msscniN  -  • 

2  CONTINUE  * 

00  5  1=1,200 

IQPMI14 

5  CONTINUE 
90  6  1=1,10 

IEBUT(I)=9 

6  CONTINUE  • 

IflLC  =IPOINT(NEXT) 

IF( IRLC  .EQ.  I Efll)  GO  TO  45 
90  10  J=l,4 

NSNIJ)=IPOINT(HEXT) 

10  CONTINUE 

ICOST  =1P0IHT(NEXT)  • 

IflLT  =IP0INT(NEXT1 
IPIT  =IP0INT(NEXT) 

I0ST  =IPOIHT(NE)fn 
I9DIN9=IP0INT(HEXT) 

I9P  =IP0INT{NEXT1 

I9RT  =1P0INT(NEXT)  • 

I9RT  =IPOINTtHEXT) 

IICP  =IPOINTINEXT) 

I9CP  =IPOINT(ltXn 
IEC09E=IP0INTINEXT) 

IURC  =IPOINT(NEXT) 

NPRIRS=IPOIHT(NEXT)  # 

IFINPRIRS  .EQ.  0)G0  TO  25 
90  20  J=l,NPflIRS 

I  (ISO  =1P0INT(I€XT) 

10R9ER1  IN9EX)=IP01HT  ( NEXT ) 

20  CONTINUE 

25  NPflIRS=lPOINT(NEXT)  _ 

IFdfffllRS  .EQ.  0)GO  TO  35  * 

10  30  J=1 , HPflIRS 

INDEX  =IPOINT(NEXT) 

IBSSET(IH9EX)=IP0IHT(NEXT) 

30  CONTINUE 
35  90  36  1=1,10 

NEU0UTI I )=1P0INT(NEXT )  -• 

X  CONTINUE 
NPflIRS=IP0INT(NEXT) 

IF(IOPfllRS.EQ.O)  GO  TO  50 
90  41  I=1,NPHIRS 

IH9EX=IPOINTUOT) 

IQPfll INDEX  )=IPOINT( NEXT)  • 

40  CONTINUE 
RETURN 

45  FUG  =.TRUE. 

50  RETURN 
END 
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C  ’STORTV’  GEHERflLIZEJ  ST0R8GE  Mil  RFTRIEV8L  ROUTINES 
C 

C - 

C  FUNCTION:  THE  SUBROUTINE  ’STORIU’  INITIRLIZES  STORAGE 

C  FOR  UK  ItCTtOMRY. 

C 

C  STATUS:  SUMOUTIIE 

C 

C  LANGUAGE:  FORTRAN  IV 

C 

C  LOST  UPDATE: 


SUBROUTINE  KUKRI  INPUT, OUTPUT, HTIHES) 

REAL18  IHflff(7,63) 

INTEGERS  OUTPUT, ICHHRS(63),ICffiiJI8l),ITE)P(8l I, IPOIHT(l) 

DATA  ICHARS  /1H  . 1HI , IH1, 1H2, 1H3, LH4, 1H5, ..36, IH7, 1H8, 1H9, 
i  1H8,  1H1, 1HC,  l  HD,  THE,  1«F,  1HG,  1101, 1HI,  1HJ,  1W, 

i  1HL,  1)01, US,  1H0,  l  HP,  1HQ,  US,  1HS,  1HT,  1HU,  1HV, 

«  US,  1HX,  1HY,  1HZ,  1H( ,  1H),  1H*,  1IK,  IH*,  1H-,  IK/, 

«  1H=,  1H, ,  1H. ,  HR,  lift,  IH*,1H>,  1H5 , 1H: ,  1H» ,  UK, 

i  1H  ,1H!,1H»,1H  ,1H?,1H  ,1H  ,1H/ 

BOTH  URGE  ' 

I  7*7H 

i  7H  Mill  ,5*7HI  l,7H  HIM  , 

1  4H  1,4H  11,414)1  1,5H  111, 

2  6H  2222, 7H2  E,7H  2,6H  2222.2H  E,1H2, 7)2222222, 

3  6H  33333, 7H3  3,68  3,6H  33,6H  3.7H3  3,6H  33333, 

4  31  4,3)  44,31  4  4,31  4  4,?H4444444,2*3H  4, 

5  7K5555535,E*1H5,6H555555,7H  5.7H5  5,6H  53555, 

6  6H  66666,7)16  6, 1H6,6H666«6, 2*7116  6,60  66666, 

7  7H7777777,6H  7,5H  7,4H  7,3H  7, EH  7,1H7, 

8  6H  88888, E*7H8  8,6H  88888,2*7118  3,6H  88888, 

9  6K  99999, E*7H9  9,7H  999999, 7H  9,7H  9,6H  99999, 

fl  7H  8  ,7H  8  8  ,7H  f)  8  ,7HRAR««A,3»7HA  8, 

I  6HBB11BI, 2i7H)  B,6HB1BI*1,2»7H1  I,6HIBB11B, 

C  6H  CCCCC,7HC  C,3*1HC,7HC  C,6H  CCCCC, 

I  6HIIBBI1, S>7HB  B,6H1BD1B1, 

E  7HEEEEEEE,EiUi,3EEEEE,EilHE,7HEEEEEn, 

F  7WFFFFFF,2*IHF,5HFFFFF,3»1HF , 

G  6H  GGGCC.THC  G,1HG,7HG  GGGG,2*7HG  G,$H  GGGGG, 

H  317HH  H,7HHHHMHl,3i7HH  H, 

I  6H  IIIII,5*4H  1,6H  III11, 

J  4*7H  J,2*7HJ  J,68  JJJJJ, 

IT*  1,6*  1,5H1  K,4HWKK,5HC  1,6*  1,7*  1, 

t  6HHL,7HLLliLLL, 

H  7*  K,7HNI  NH,7HN  H  H  H,7*  H  11,3*7)01  H, 

H7HH  N,7HNR  11,7)01  H  11,7)01  H  H,7*  H  H,7HH  Nil, 

H  7HM  H, 

0  7H0000000, 5*7H0  0,71)0000000, 

P  6HPPPPPP,2*7HP  P,6HPPPPPP,3*1HP, 

3  6H  00000,3*710}  Q,7HQ  QQ  Q,7HQ  QPQ,7H  QQQQQQ, 

R  6HRRRRRR,2*7HR  R,6HRIRRRR,5HR  R,6HR  R, 7KR  R, 

S  6H  SSSSS.7HS  S,1HS,6H  SSSS$,7H  S,7HS  S,6H  SSSSS, 

T  7HTTTTTTT,6*4H  T, 

U  6*7HU  U,6H  UUUUU, 

V  4*7HV  V.6H  V  V,5H  V  V,4H  V, 

113*7*  H,7W  H  H,7*  H  H  Br7Wi  HD,  7*  H, 

X7HX  X.6HX  X,5H  X  X,4H  X,jH  >'  X,6H  X  X,7HX  X, 

Y  THY  Y,6H  Y  Y,5H  Y  Y,4*4H  Y, 


y 


i 


y 


y 


y 


y 


y 


y 


y 
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SSQ? 


Z  7HZZZZZZZ.5H  Z,5H  Z,4H  Z,3H  Z,2H  Z,7HZZZZZZZ, 

(  5H  (,4H  t,3*3H  (,4H  (,5H  (, 

I  3H  ),4H  ),3i5H  ),4H  l,3H  ), 

l  IH  ,4H  *,7Hh  i  n,5H  m,5H  i  *,4H  i  «,1H  , 

$  4H  *,6H$$$t*,4H*  $,6H  $$$$$, 7H  1  $,fcHM$*,4H  (, 

♦  1H  ,4H  +,4«  ♦,ZHHmH,2*4H  *,iK  , 

-  3*1H  ,6H - ,3»1H  , 

/  7H  /,6H  /,5H  /,4H  /,3H  /,2H  /,IH/, 

=  2*1H  ,6H  =~,1H  ,6H  =====,2»1H  , 

,  4«1H  ,4H  „,4H  „3H  „ 

5>1H  2MH 

i  n  x  ’  *,«&£», 5H  x  x,w  i,oh  x  x,n  x  x  x, 

t  4H  tt,5Hl  t,2MH  tt,7Ht  U,SK  t,7H  tilt  t, 
i  6H  ”  “,6H  1  *,5H  *  *,4iIH  , 
l  2H  >,3H  >,4H  >,5H  >,4H  >,3H  >,ZH  >, 

i  1H  ,2MH  ..,1H  ,2i4H  ,,,3H  „ 
l  1H  , E*4H  ..,IH  ,2*444  ...1H  , 

I  4H  ”,4H  ’,3H  \4*1H  , 

*6H  (,5H  (,4H  < , 3H  (,4H  <,5H  <,6H  <f 

i  6I1H  ,7H _ , 

i  4*444  !‘,1H  ,2*444 

i  1H  ,544  I  »,6H  tttt«,5H  *  i,6H  ttt«,5H  <  t,lH  , 
l  IN  ,7N  ,7H  ,4*1H  , 

i  5H  ???,6H?  ?,5H  ?  V«4H  ?,1H  ,4H 
«  7»4H  , 

« 5H  ",4H  ’,5H  »,4*1H  , 

«  6N  ”  ”,5H  ’  ’,SH  ’  ’,4*1(1  / 

m  ( input, 7inic«a 
S  SO  21  J=1,M 

SO  II  K=l,63 

IFIICMMJ)  .EQ.  ICHBRSIXHGO  TO  15 
II  CONTINUE 

K  =1 

15  1TEHP(J)=X 

21  CONTINUE 

ENTRY  RGflINI OUTPUT, HTIHES) 

WITH  OUTPUT, Ml) 

N  30  J=1,NT1N£S 
SO  25  K=l,M,16 
L  =H  ♦  15 

HRITE(0UTPUT,8tl)((lRRGE(I,ITDf(R)),IN(,L)fIsl,7) 
CONTINUE 
CONTINUE 
RETURN 

ENTRY  HESBfl! OUTPUT, NTINES,N18,IPQINT) 

H  =IHI8  -11/4*1 
X  A 

M  32  1=1,14 
SO  31  J=l,4 

X  =X  t  1 
ITDP(K)=ICl»Sm 
4J=J 

CULL  CONCRTIITEHPlXljljIPOINTlDjJJ,!) 

31  CONTINUE 

32  CONTINUE 

I  A 

IFIHIR  .LT.  17)1  =41  -  m  /  2 

K  41  J=1,W 

IFU  .11.  I  .OR.  J  .GT.  (OS  *  I)GO  TO  35 
ICBRI(J)=ITENP(J) 

GO  TO  41 

35  ICfKI(j)=ICHRR$m 
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41  COHTimi 
GO  10  5 

7(1  F0RNATI8IA1) 

m  FownniHn 

8(1  FORMIt  (///// f  7(  3X,  16K8,  /  n 
END 

SUBROUTINE  C0NCATUA,L,1B,J,K) 

IINENSION  1B(L),I1(J),IC(4) 

C 

DECOttl 11,811 )IC 

8ii  forhatmii 

c 

IAIL)=IC(J) 

c 

RETURN 

END 

C  'PAGE  ’  PRINTS  NEH  HEfiDEK  ON  ANY  OUERVIEil  MEL  REPtKT 
C 

C - 

C  Function:  PRINTS  0  NEW  HEflKR  PAGE  FOR  (NY  OF  THE  OVERVIEW 

C  MODEL  REPORTS. 

C 

C  STATUS:  SUBROUTINE 

C 

C  LANGUAGE:  FORTRAN  10 

C 

C  LOST  If  DATE: 

C - 

SUBROUTINE  PAGE! IUNIT) 

C 

INTEGER*  IPAGE(2l),TITl£(7, 41, CLASSICS) 

C 

COHHOH  /(LOCKE/  I0ATEl(4l,I]flTE2(4),in»C(G),N0Ml£,ICLASS 
C 


DATA 

IPAGE  /  2(4/ 

BATA  TITLE 

/’SHOR’,’TFAL’,’L/W’,’Y  NO’,’DUU', 

f  9  9 

9 

i 

'HISS’, ’ION  yiECPyAMTyiOH  ’, 

■HOJUVLE 

9 

i 

’PIPE’, ’Lilt’,'  FIL’,’1  NOyBULE', 

f  »  9 

9 

9 

i 

’REAiyiNEsys  HoywiEy  ’, 

9  »  1 

9 

BATA 

CLASS  /’UNCL’,’ASSI’,’Fia’,’  ’,’ 

1  » 

1 

9 

9 

i 

'FOR  * ,’OFFI’ ,’CIRL’ ,’  USE’,’ 

0H17Y 

1 

9 

i 

’ClASySIFiytD  t’,'CONF’,’ 

1  V 

9 

9 

i 

'CLRS’,’SIFI','ED  C.’SECR’,’ 

El)  V 

9 

f 

i 

’CLAS’,’SIFI’,’ED  (’/TOP  ’,’ 

SECRVET) 

V 

C 

IPAGEl  IUNIT)=IPAGE(  UNIT )  ♦  1 

WRITE!  KNIT,  811 HTITLEC  I,  NOKJIE),  1=1,7),  KJNIT,  IPAGEI IUNIT), 
i  I1ATE1, l INANE! 11,1=1,6), IDfiiE2, 

i  (CLASS!  I, ICLASS), 1=1,6) 

RETURN 

8(1  FORNATi’lSYNERGY,  INC.  OVERVIEW  HOKL  ’,7A4,'  REPORT’,  13,’  PAGE’, 
l  15,/,  IX,  2(04) 

00 

C  ’RANGE’  FINDS  X  SUCH  THAT  RNIN  <=  X  <=  RKRX 
C 

C - 

C  FUNCTION:  FIMS  X  SUCH  THAT  RNIN  <=  X  <=  RNAX 

C 

C  STATUS:  FUNCTION 

C 

C  LANGUAGE:  FORTRAN  IU 

C 
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C  LAST  UPDATE: 


FUNCTION  RANCE(X,RNIH,R/IAX) 

C 

RANGE  =X 

IF(X  .LI.  RH1N9RIMGE  =XHIN 
IFIX  .GT.  RHAXIRANGE  =R«AX 
IF1RAHGE  .LT.  I.IIIHl  (RANGE  l.l 
RETURN 
END 

FUNCTION  IPOINTUDUHHY) 

C  - 

DIHE11S10N  IDHTA1317) 

C 

DATA  »  /  317/ 

C 

N  =N  ♦  1 
IFIH  .GT.  317)0)  TO  21 
II  IPOIHT=tDATAIH) 

RETURN 

21  READllUISATA 
N  =1 
GO  TO  II 
END 

C  'REPT15  »  OPTIONAL  REPORT  15 
C 

C - 

C  FUNCTION:  THIS  SUDROUTINE  ECHOS  INPUT  DATR 

C 

C  STATUS:  SUWOUTINE 

C 

C  LANGUAGE:  FORTRAN  IU 

C 

C  REQUIRE)  SUDROUTIICS:  PAGE 
C 

C  LAST  UPDATE: 

C - 

SUBROUTINE  REPT15IIEC0IE) 

C 

CONHON 

i 
i 

CONHON 
COWON 

l 
I 

C 

SATA 
C 

IF(H01(LIKS,5t)  .1C.  DGO  TO  II 
CALL  PAGE! 15) 

HITE!  15,811) 

II  10  21  J=1,H(JHNI$ 

IFlIQPAt J)  .1C.  DGO  TO  31 
21  COAT  HUE 

31  HRITEC 15,821  MSN,  COST, URCOST, IALT,IPLT, IIRT, IJRT, I0ST.FR, 
i  IP,ICP,ICP,IEC0DE,IIL,IN1U,LSTHDS(J)),I=1,2), 

«  IQPAU) 

LINES  =L!NES  *  1 
IFU  .EQ.  IWMSIRETURN 
INDEX  =J  ♦  1 


/ILOCKC/  NSNl4),COST,Ha.T,IPLT,iOST,IP,BP,8CP,DCP,OlfflCP, 
ONDCP.FR,  URCOST,  IIRT,  IDRT,  I IL,  IILS,  IILU,  1 ILO, 
tCWAR(ll),!QPAl2tl) 

/B.OCB/  NlU,2ll),N2(2ll),N3f2ll),NH0RBS,NLENTH,NFREE 
/B.0C1U1/  LSTFSCI 211 ), LSTNSSI 211 ),  LSTALCI 5), NDREFI  71,21 1, 
IFXSEFt  51 ,21 ) ,  JCOUNT ,  (COUNT,  ICQUWT,  NCOUNT, 
NUIIIDS,HUNFSC,IUKALC,JX0UNT(5I),LX0UNT(78) 

LINES  /  1/ 
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DO  51  J=I!0EX,I*JHH1S 

IFUQPAIJ)  .EQ.  8  )C0  10  58 
IFiN0B(LIICS,5«)  .1C.  8  ICO  TO  48 
OKI  PAGE115) 

*ITE(  15,818) 

48  *UEU5,83I)(H1(I,L$TNBS(J)),I=1,2),IQPA(J) 

Lines  =LINE$  *  1 
58  CONTINUE 

RETUWl 

818  F0RHAT('8’,9X,’Nffi!TER’,18X,’UHIT  ABH1N  PRO!  1RSC  DEPOT’, 
i  ’  ORDER’ ,9X, ’  IASE  BASE  DEPOT  ITEH’,7X, 

*  ’  APPLICATIONS’,/, 

*  11X,»ST0GX’,7X,’UWT  REPAIR  LEAD  HAD  REPAIR  REPAIR’, 

i  ’  ♦  SHIP  BENAJ1B  ARTS  COtll.  COHD.  ESSEH.  STOCK',  151'-' ),/, 

*  18X,'NUNBER',2(7X,’COST’  ),5(39(,’TIIC'  l,5X,'RATE  RATE’, 

«  2(3X,’PCHT’),3X,’C0BE',’  LEOEL',’  SYSTEM  AHOUNT’,/, 

«  IX, 151'-’), 21’  - '  1,51'  - - ’, 

i  51  ’ - 'I,'  . . . ') 

828  F0RNRTUX,3A4,R3,2Fll.2f5I7,F9.6,3F7.2,2I7,lX,A4,A3,I7) 

838  F0RHATU18X,A4,A3,I?) 

END 

C  'REPT17  ’  OPTIONAL  REPORT  17 
C 

C - 

c 

C  FUNCTION:  THIS  SUIROUTIIC  PRINTS  THE  ON-ORDER  REPORT 

C  AND  THE  ON-HAND  ASSETS  REPORT. 

C 

C  STATUS:  SUBROUTINE 

C 

C  LANGUAGE:  FORTRAN  IU 

C 

C  REQUIRED  SUBROUTINES:  PAS, IRTR0H,UN1CR, BUM, SZEROJZESQ.SUDTTl, TOTAL 
C 

C  LAST  UPDATE: 

C - 

c 

SUBROUTINE  REPT17 


C 

C 

C 

C 


REALM  X(4,17),Y(4,15) 

CONNON  /DLOCXZ/  I0RDERU7),0N0RK(4,17I,IASSETU5),ASSETS(4,15) 


EQUIVALENCE  I0N0RDR,X), (ASSETS, Yl 


CALL  PAGE!  17) 

MUTE!  17,888) 

*111(17,811) 

CALL  SZERO 
CALL  TZERO 

CALL  URTR0HU7,’  OH  ORDER  PR  REPORTO  ’,27,X(1,  1), 4, 15,8,28) 

CALL  WTRONI17,’  ON  DRIER  PR  FUNDED  ’,27,X(1,  21,4,15,8,28) 

CALL  *TR0NU7,’  ON  ORDER  CONTRACTOR  ’,27, XU,  31,4,15,8,28) 

CALL  WTROHU7,’  OH  ORDER  PR  FUNDED  -  *H  ’,27, XU,  41,4,15,8,28) 

CALL  *TR0HU7,’  ON  ORDER  CONTRACTOR  -  HRH  ',27, XU,  51,4,15,8,28) 

CALL  UNDER  (’-’) 


CALL  SUITTL1 17,  ’  TOTAL  ON  ORDER  ASSETS 
CALL  BUM  (1) 

CALL  SZERO 

CALL  *TROHU7,’  ISSP  SERVICEABLE 
CALL  WJROMU7,’  ISSP  UNSERVICEABLE 
CAU.  *TR0HU7,’  ISSP  TOC 


’,27) 


’,27, XU,  61,4,15,8,28) 
’,27, XU,  71,4,15,8,28) 
’,27, XU,  81,4,15,8,28) 


* 


« 


% 


« 
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',27,  YU,  141, 4, 15, 1, 28) 
’,27, Y(l, 151,4, 15, 0,28) 


CULL  SU1TTUI7/  TOTAL  DUE-IN  ASSETS  ’  ,27) 

CALL  BLOW  d) 

CALL  UNKS  (’=’) 

CALL  TOTAL  (17, •  TOTAL  OH  ORDER  ♦  BUE-IN  ’,27) 

CALL  UNDER  (’=’1 
CALL  PAGE117) 

HRITEI 17,812) 

HRITEd7,8tl) 

CALL  T2ER0 
CALL  SZERO 

CALL  HBTK0H(i7,*  SERVICEABLE  BASE  ABB  1EP0T',27,Y(1,  1), 4, 15,1,28) 
CALL  HRTRQH(17,’  SERVICEABLE  CONTRACTOR  ',27, Yd,  2), 4, 15,1,28) 
CALL  STROK17,’  SERVICEABLE  INTRBBSIT  ',27, Y(l,  31,4,15,1,28) 

CALL  UNDER  (’-’) 

CALL  SU1TTLI 17,*  TOTAL  SERVICEABLE  PEACE  ',27) 

CALL  BLANK  111 
CALLSZERO 

CALL  STROK17,’  WK  BASE  SERVICEABLE  ',27, Yd, 14), 4, 15, 1, 28) 

CALL  HRTRONI17,'  «R  BEPOT  SERVICEABLE  ',27, Yd,  15), 4, 15, 0,28) 

CALL  UNBER  l’-’) 

CALL  SU1TTU17,'  TOTAL  SERVICEABLE  HAS  *,271 
CALL  BLANK  d) 

CALL  UHBER  ('=’) 

CALL  TOTAL  117,'  TOTAL  SERVICEABLE  ASSETS  ’,27) 

CALL  UHBER  (»=') 

CALL  BUM  d) 

CALLSZERO 

CALL  HRIROH17,’  UNSERVICEABLE  BASE  ’,27, Yd,  41,4,15,1,28) 

CALL  WTROH117,'  UNSERVICEABLE  BEPOT  ',27, Yd,  8), 4, 15, 1, 28) 

CALL  HRTROM17,’  UNSERVICEABLE  CNTRCTR  SCHB’,27,Yd,  5), 4,15, 1, 28) 
CALL  HtTROHl  17,'  UNSERVICEABLE  CNTRCTR  UNSC’,27,Yd,  61,4,15,1,28) 
CALL  (KTROHUV  UNSERVICEABLE  INTRANSIT  ',27, Y11,  71,4,15,1,28) 
CALL  UNBER  (’*’) 

CALL  SUBTTU17,’  TOTAL  UNSERVICEABLE  PEACE  ’,27) 

CALL  BUNK  (1) 

CALLSZERO 

CALL  HTROH17,’  URN  BEPOT  UNSERVICEABLE  ’,27, Yd, 11), 4, 15, 1, 28) 
CALL  UNBER  (’-’) 

CALL  SU1TTLC 17, *  TOTAL  UNSERVICEABLE  HAR  ’,27) 

CALL  BLANK  (1! 

CALL  UNDER  (’=») 

CALL  TOTAL  (17,’  SERVICEABH+UNSERVICEABLE  ’,27) 

CALL  UNDER  (’=’) 

CALL  BLANK  (1) 

CALLSZERO 

CALL  HRTR0W17,’  TECHNICAL  ORDER  C0tHIflNCE’,27,Y(l,  91,4,15,1,28) 
CALL  STROH17,’  UNSERVICEABLE  BAILHENI  ’,27, YI1, II), 4, 15, 1,28) 
CALL  STROM  17,’  UNSRV  BUE  IN  FROM  OVERHAUL’, 27, Yd,  12), 4, 15, 1, 28) 
CALL  NRTROHL 17,’  UNSERVICEABLE  BOTH  ’,27, Yd,  13), 4, 15, 1, 28) 

CALLUNBER  (’-’) 

CALL  SU1TTH17,’ TOTAL  OTHER  ’,27) 

CALL  BLANK  d) 

CALL  UHBERI’-’) 

CALL  TOTAL  (17,’  TOTAL  ASSETS  ’,27) 

CALL  UH1ER  (’=’) 

RETURN 

FORNATI ’ 1’ , //////, IX, ’ ON-ORBER  REPORT’,///) 

F0RNAT127X,’  RASTER  I TENS  HUHIER  I TENS  COST  TO  REPLACE’ , 

«  ’  COST  TO  REPAIR’./. 

2 


812  FORNATCI’, //////, IX,’ 


REPORT',//') 


r 


i 

r 

t 

\ 

§ 


t 


CALL  TZERO 
cm  SZE50 

cm  HRTR0HU7,'  SERVICEMLE  RASE  Ml  REPOT’, 27, YU,  11,4, 15, 1, £8) 
cm  WTR0MU7 SERV1CEAILE  COWTCKCTOR  ’,2?,Yti,  £1,4,15,0, £8) 
cm  WTR0UU7,'  SERVICEABLE  INTRANSIT  ’,27, YU,  3),4,t5,8,£8) 
cm  UNDER 

cm  3UBTTLI 17, ’  TOTAL  SERUICOILI  PEACE  ’,£7) 

CALL  HANK  (1) 
cmszERO 

cm  HRTR0HU7,’  URN  BASE  SERUICEAJLE  ’,£7, Ytl, 141,4, 15,0, £8) 

Cm  HRTR0W17,’  m  DEPOT  SERUICEAJLE  », 27, YU, 151,4, 15, D, £8) 

CALL  UNDER  ('*’) 

Cm  SUITTU17,'  TOTAL  SERUICEA1LE  M  ’,£7) 
cm  JLA*  111 
CALL  UNDER  !’=’) 

cm  TOTAL  (17, ’  TOTAL  SERVICEABLE  ASSETS  ’,£7) 

CALL  UNDER  (’*’) 
cm  HA*  (11 
cm  SZERO 

cm  URTROHl  17, *  UNSERVICEABLE  BASE  ’,£7, YU,  41,4,15,8,281 

Cm  HRTR0UU7,’  UNSERVICEABLE  BEPOT  ’,27, YU,  81,4,15,8,281 

Cm  WTR0IU7,’  UNSERVICEABLE  CNTRCTR  SCAB', £7, YU,  51,4,15,8,281 
Cm  ISTROIIUy  UNSERVICEABLE  CNTRCTR  UNSC’,27,YU,  61,4,15,0, £8) 
Cm  HRTR0HU7,’  UNSERVICEABLE  INTRANSIT  ',27, YU,  71,4,15,8,281 
CALL  UNDER 

Cm  SUDTTLU7,'  TOTAL  UNSERVICEAHE  PEACE  ',271 
CALL  1LA*  tl) 
cm  SZERO 

cm  #IR0UU7,’  URN  DEPOT  UNSERVICEABLE  ',£7, YU, 11), 4, 15, 8, £81 
Cm  UNDER 

cm  SUBTTK17,’  TOTAL  UNSERVICEABLE  MAR  ’,£71 
CALL  BLAB*  (1) 

CALL  UNDER  (’=’) 

Cm  TOTAL  117,’  SERVICEABLE H1NSERVICEABLE  ’,£71 
cm  UNDER  (’=’1 
cm  HA*  (11 
cm  SZERO 

cm  URTR0IIU7,'  TECHNICAL  ORDER  C0lfL!ANCE»,£7,YU,  91,4,15,8,281 
Cm  URIR0UU7,’  UNSERVICEABLE  BAIINENT  ’,£7, YU, 18), 4, 15, 8, 28) 
Cm  MRTRQ0HI7,'  'JNSRV  BUE  IN  RON  OVERHAUL’, 27, YU, 121,4,15, 8, 28) 
Cm  MTR0UU7,’  UHSERVICEAILE  BOTH  ’,£7, YU,  131, 4, 15, 8, £8) 

Cm  UNDER 

Cm  SU1TTLU7,’  TOTAL  OTHER  ’,27) 

CALL  HA*  (!) 

Cm  UNDER!’5’) 

cm  TOTAL  U7,’  TOTAL  ASSETS  ’,271 

Cm  UNDER!’*’ I 

RETURN 

888  FORNAT! ’I’, /'////, IX, 'ON-ORKR  REPORT’,///) 

811  F0RNAK27X,’  IBSTER  1TENS  NUNDER  ITENS  COST  TO  REPLACE’, 
l  ’  COST  TO  REPAIR’,/, 

i  27X,’ - 

i  ’ - ',//) 

882  FQRNAT('8y/////,lX,’  ASSET  REPORT’,///) 

END 
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C  INSERTS  COMMAS  INTO  NUMBERS 

C - 

C 

C - 

C  fUNCTION: 

C 
C 
C 
C 
C 
C 
C 

c 
c 
c 
c 
c 

C  STATUS: 

C 

C  LANGUAGE: 

C 

C  PRECISION: 

C 

C  REQUIRES  SUBROUTINES:  NO* 

C 

C  LAST  UPDATE: 

C 

C - 

r 

SUBROUTI*  iCTROIK  IUNIT, STUB, LEM.  3RUE,L£N1, IHIDTH,  I  DEC,  1ST  ART) 
C 

DIMENSION  SfWE(L£Htl,IIUf(132) 

JIMENSIOH  BATAI 121, 1  DATA!  12  I, NUMBER!  II 1 ,TQTALll  12 ) ,  TOTAL2(  12) 
CHARACTER  STUBHEN 


BATA 

I  BUNK 

/4H 

/ 

DATA 

MINUS 

/1H- 

/ 

DATA 

ICOMHA 

/IH, 

/ 

DATA 

IPOIMT 

m. 

/ 

DATA 

I  ASTER 

nm 

/ 

SATA 

NUMBER 

/IHO,IHI, 

!H2, !H3, 1H4, 1H5, 1H6, 1H7, 1H8, 1H9/ 

C 

IFTLOII  .EQ.  1)00  TO  2 
DO  1  I=1,LEH1 

TOTALlUMOTHLim  ♦  SMEW 
T0TAL2I I )=T0T«L2C I )  ♦  SAVE! ! ) 

1  DflTRfl )=SAUEl U 
C 

2  DO  3  1=1,132 

3  IDUrilWBIRW 
DECODE!  STUB,  8WIBUF 
IFtLENl  .ED.  I  ICO  TO  71 

C 

L  =L£Hl 
IFIIBEC  13,5,6 
S  BO  53  I=l,L 

IT! BATA! 1 1)51, 52, 52 
31  IBATA(I)=INT(DATA(II  -  .5) 

GO  TO  53 

52  IDRTA(II=INT(DATA(I)  +  .M 

53  CONTINUE 
GO  TOO 


THIS  SUBROUTINE  INSERTS  COHHAS  INTO  THE  ARRAY 
Of  NUMBERS  PASSES  TO  IT  RHB  PRINTS  THEN  OUT 
ALONG  HUH  THE  STUD  ACCORDING  TO  THE  FIELD, 
'HIBTH',  AND  3ECIHAL,  'IBEC,  PARftHETEJS 
SUPPLIED.  IT  HAS  SEVERAL  ENTRY  POINTS: 

UNDER  UNDERLINES  HITH  CHARACTER  ’ICHAR’ 
BLANK  PRINTS  ’M’  BLANK  LINES 

SZERO  ZEROES  OUT  SUBTOTAL  ACCUHULATQR 

TZERO  ZEROES  OUT  TOTAL  ACCUNULATOR 

SUBTTL  PRINTS  OUT  SUBTOTAL  ACCUNULATOR 

TOTAL  PRINTS  OUT  TOTAL  ACCUNUUITOR 

SUBROUTINE 

FORTRAN  W 

SINGLE 
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c 

6  FntuzfioiimtHiKC) 

DO  7  1=1,1011 

7  MTA(I)=MTfHI)NHULT 
GO  TO  5 

C 

8  nn  =IST8RT 
DO  68  1=1,1011 

KEEP  =IRSS(  IDRTIUL ) ) 
inn  =i«n  ♦  imiTH  -  i 
SXT  =IFIH  ♦  1 
IFI1IEC  .EQ.  IIGO  TO  II 
C 

DO  9  1=1, 1  DEC 

J  =80BIKE£P,1I)  ♦  1 

IBUF(IFIH)=8UH1£RIJ) 

KEEP  =KEEP  /  II 

IFIH  =1FIB  -  1 

IF1IFI8  .IT.  IHIT)GO  TO  38 

9  CONTINUE 
IIUF(IFIN)=IP0I8T 

inn  =ifih  - 1 

1FIIF18  .IT.  INITICO  TO  31 
C 

II  10  21  1=1,3 

J  =8011  KEEP, 111  ♦  1 

IBUF(IFin]=NURlER(Jl 
KEEP  =KEEP  /  II 
IF1KEEP  .EQ.  IIGO  TO  SI 
IF 18  =IFIB  -  1 
IFIIFI8  .IT.  INITICO  TO  31 
21  C0BT1BUE 

IHIF(IFI8)=IC0MI 
IFI8  =IFIB  -  1 
IF! IFIH  .GE.  INITICO  TO  II 
C 

31  IFIH  =IHIT  ♦  IHI1TH  -  1 

N  41  I=IHIT,IFIH 
41  IHJF{I)=IRSTER 

GO  TO  41 
C 

SI  IFllATRIi; 155,61,60 

35  IF1IFIH  .IE.  IHITIGO  TO  31 

HUFIIFIH  -  i)=HIIRIS 
C 

61  IHIT  =HXT 

71  IFIIHIT  .IT.  1  .OK.  IHIT  .GT.  1321IHIT=132 
KITE!  IIRIIT.nillllUFII),  1=1,  IHIT) 

RETURN 

C - - - 

C  UNDERLINE  THE  LUST  LINE  PRINTED. 

C - 

ENTRY  UHKR  (ICWK1 

10  71  1=1,132 

71  1NF(I)=I11!MK 

K  =IST8RT 

10  81  1=1,1 

N  =!MITH  -  1 
n  75  J=l,8 

IWFIK  ♦  DMCHflR 
75  K  =K  M 

K  =K  ♦  1 
81  CONTINUE 


155 


PRINT  W  1LA*  LINES. 


ENTRY  II M  (N) 

DO  85  I=1,N 

85  URITEI  IIMIT,891  HILflNK 
RETURN 

C - 

C  ZERO  OUT  SUITOTRL  ACCUHULRTORS. 

C - 

ENTRY  SZERO 

DO  36  1=1,12 

86  T0THL1U)=M 
RETURN 

C - 

C  ZERO  OUT  TOTAL  ACCUNULATORS. 

C - 

ENTRY  TZERO 

DO  87  1=1,12 

87  TOTAL2(l)=l.l 
RETURN 


PRINT  SUITOTAL  ACCUNULATORS 


ENTRY  TOTAL  (IUNIT,STUI,LEH) 
DO  89  1=1,12 

89  BATAUI=T0TRL2U) 

GO  TO  2 


OUTPUT  FORNAT 


801  F0RHAT1132A1) 

END 

C  ’FLYURA’  FLYING  HOUR  PROGRAH  SUBROUTINE 


C  FUNCTION:  THIS  SI 

C  CQHPUTI 

C  REQUIR1 

C  PROGRAI 

C 

C  STATUS:  SUBROU 

C 

C  LANGUAGE:  FORTRfH 

C 

C  REQUIRED  SUBROUTINES:  I FETCH 
C 

C  LAST  UPDATE: 


THIS  SUBROUTINE  READS  FLYING  HOUR  PROGRAH, 
CQHPUTES  PEACETIHE  AHB  HARTINE  FLIGHT  HOUR 
REQUIRENENT  FOR  EACH  MBS,  AND  PRINTS  FLYING 
PROGRAH  REPORT. 

SUBROUTINE 

FORTRAN  IU 
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SUWOUTINE  FLYHRSCPIIII1T,  JIBTS,  UflYSJ 
C 

LOGICAL  PRIlfT 

£flTEG£R«4  MS<4),IPOINT{188),IT£HP(9) 

C 

comm  /ILOCtt/  IHFHWK  3, 36  J ,  IPFH1Y(  J ,  NUHflCt  £«•  I 

comotl  /ILOCXI/  lYR, JY8,TFH,PFH, IHC'JRSt 36),ftD,RBS,RBS,flFI,flBI , 

i  flPRI ,  BffEPRP ,  ICOHIP,  BREPRH ,  SCON8II  f  DREPRP,  DCOH1P, 

i  WtEPRMCGHM 

COHNQH  /BLOCO/  NlC4,£80),B£t2Ml,»rK2C?l,M(ORBS,HL£HTHf«FREE 

comm  /iiocxn/  lstfscc  eii ) , lsthdsi  ano  ? , lstrlci  5 ) , mdxref  ( ?8 , ae  i  , 

i  IFJ«EFC5a,2IJ,JCOU!1T,KCQU«T,LCOUintHCOUIfT, 

i  IflimiSjfRJHFSCjItjmLC,  JJ'0UHT(5#),LK0UKT170) 

COMM  /1LOCXX/  TPflRTSl366),TUflLUEt366),PH0URSl36G),TH0URS(366I 

C 

BOTH  IPOIHT  /  1,  2,  3,  4,  5,  6,  7,  3,  9,11,11,12,13,14,15, 
i  16,17,18,19,21,22,22,23,24,25,26,27,28,29,31, 

i  15*31,15*32,38*33,30*34,31*35,38*36/ 

SRTfl  DONE  /  4HWNE/ 

C 

IF(  IYR  .EQ.  1IREM  105,708 IDUHHY 
REfll  115,701 UYERR 
LINES  =0 
TFH  =0.0 

C - - - - - 

C  REM  FLYING  HOUR  PROGRAM. 

C - - - — — - - — - — - - 

10  REM  (05,700  IMS, IFF, DRIER, X,ITENP 
IF(MSU)  .EQ.  I80NE1GO  TO  60 
CALL  IFETCHII10, HIS, N1,H2,W,NH08BS,HLE!1TH,  INDEX) 

N  15  lt=l,IHIHlS 

I  =LSTH8S(1I) 

IFdNBEX  .EQ.  I)GO  TO  20 
15  CONTINUE 
GOTO  10 

20  IPFHJYIIHIEXHPF 
HUHflC  (IMEXWMOER 
TFH  =TFH  MPFHIY(INJEX) 

HCFT  =NUMER 

Y  =ACFT  *  X  /  110.0 

X  =0 

90  25  >1,3 

IFLY=INT(ITEHP<J)  *  Y  ♦  .5) 

10  24  Id, 5 

X  =X  ♦  1 
IITHIN(I«l£X,X)--IFLr 

24  CONTINUE 

25  CONTINUE 

IFIY  =lHT(lTE]ff(4)  *  Y  +  .51 

SO  26  X=16,38 

MURK  INDEX, K)=IFIY 

26  CONTINUE 

IFIY  =lNT(ITElff(5)  «  Y  ♦  .5) 

IHFHDHl INDEX, 31 )=IFIY 
IirMNUNIEX,32MaY 
HFHRH IMEX, 33 )=INTU TEfff 1 6 )  *  Y  ♦  .5' 

IHFHDH1 INDEX, 34)=INT( ITEJf( 7 )  *  Y  +  .5) 

IHFHIHt  INDEX, 35)=IH!UTEHP(8)  *  Y  1  .5) 

IIITflN)  INDEX, 38 )=INT(  ITENPI9)  *  Y  *  .5 
1FUMBER  .EO.  I  ICO  TO  10 

Y  =FL0RTIIFfHIY(  INDEX  II  t  HCFT 
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ir(HOjaiits,K)  .he.  oisrnrw 

IFIPRINTICAIL  PAGE1861 

IF*  PRI«T  )WITE(«6,eO  1 )  JYR,  1 1 , 1=1 , 38 » 

41  IF(PRIHT)»lH{I6,302)(Hl(JfIHIOt,J=l.i),HUHIERfY, 
i  IPFHIYt  IH1EX),X,  ( t  IHFHWI  INDEX,  J)  ),J=1,36) 

LINES  =L1HES  ♦  4 
GO  TO  19 

61  TFH  =TFW  *  JMYS 
10  75  1=1,36 
1H0URS11N 
10  65  X=1,DHHD$ 

IKOUSS*  I  )=IHOURS(  I )  ♦  114041141 LSTNISC  K ) ,  I ) 

65  CONTINUE 

75  CONTINUE 

THM«Sm=IHOlRSm 
DO  81  1=2, IDflYS 

89  THOURS(I)=THOURSll  -  1)  ♦  IHOURSI IP0INT1I) ) 

RETURN 

799  F0RNAT(1X,3»4,A3,2I6,F6.2,9I3) 

791  FORttflTl IX,  14 ) 

C - 

C  OUTPUT  FORHATS 

C - 

891  FORNATl 'DRYING  PROGRAM  FOR',  15, 

*  IX,'  PEACETIHE  ’ ,42X, 'MflRTINE  FLY  HRS/DfiY',/, 

i  IX,’  FLY  HRS/ JAY’, T34, 931 ’-’),/, 

*  IX,’  -  ’,9X, 1516,/, 

i  IX,’  EACH  WHOLE’, 5X.’  EACH’, 4X,  1516,/, 

*  IX, 'IBS  9ACFT  ACFT  FLEET’, 5X,’  ACFT’,4X,’  31-45  46-69’, 

i  ’  61-99  -120  -150  -188',/, 

*  IX,’ - ’,5X,'  - ’,4X,15I’  - ’)) 

892  F0RN8TI’9’,2A4, 16, F6.2, 16, 5X,F6.2,4X, 1516, 2(/,42X, 15161) 

END 

C  ’IlfKOPT’  UARTIHE  REQUIRENENT  FUNCTION 
C 

C - 

C  FUNCTION:  THIS  FUNCTION  SUBPROGRAM  COMPUTES  OPTIMUM 

C  UARTIHE  INVENTORIES. 

C 

C  STATUS:  FUNCTION  SUBPROGRAM 

C 

C  LANGUAGE:  FORTRAN  1U 

C 

C  LAST  UPDATE: 

C - 

c 

FUNCTION  HAR0PT(IDHYS,BT0P,HHTH1P1 
C 

DINENS10N  X*  14),  IP0INT1 365 1  ,SHOUR$(  366 ) 

LOGICAL  1T0P 
C 

CCNNON  /BLOCXA/  IHFHNII3,36),lPFTBYt296),HUNRC(288) 

CONNON  /HOCXI/  IYR,JYR,TFH,PFH,IH0URS1361,AD,ADS,ABS,RBI,AII, 

i  APR  I ,  BREPRP ,  KCBOP ,  BRETRM,  BC0M1M,  IWEPRP ,  9C0MBP , 

i  9REPRN,IC0N8H 

CONNOR  /ROCXC/  HSN14),COST,IALT,IPLT,!OST,IP,!P,BCP,IICP,OHBCP, 
i  ONKP,  FR,  ORCOST ,  11RT,  1 DRT ,  1IL,  1 1LS,  11LU,  1 1L0, 

i  NDWAR(19),IQPR1290I 

CONNON  /ROCXH/  LSTFSCI298),LSTNKi2fl8!,LSTALCl5),NBXttF(78,29), 
«  IFXREf  (59,29  ),JCOWT,KOMJNT,LCOUHr,HCOUNT, 

«  NUHNIS,NUNFSC,IMW.C,JKAUHT159),LX0UNT(79) 

CONNON  /ILOCXX/  TPRRTS ( 366 ) , TUALUL 1 36-  , PKOURSI 366 ) , THOURSt  366 ) 
CONNON  /ROCKY/  1EHAHJ(366),IPIPE( '66  ,9PIPE(366),BPARTS(366), 
IPARTS(366),RE0NNT  36s 
158 


I  —  _ 

c 

EQU[«RL£NCE(X(1),M> 

C 

DATA  IPflllfT  /  1,  2,  3,  4,  5,  6,  7,  8,  ».», 11, 12, 13,14,15, 
i  16,17,18,19,21,21,22,23,24,25,26,27,28,29,31, 

i  15«31, 15«32, 38*33, 3U34, 3U35, 21506/ 

C 

IFtIDfiYS  .£Q.  I (GO  TO  91 
JFIDTOP  .Mil.  IIPLT  .11.  IfflIHJPDQO  TO  91 
10  21  1-1,36 
IHOURSIIN 

do  ii  K=i,nums 

II  IH0URS1 1  )=IHQURS(  1 1  ♦  IHFHimLSTHDS(K), I)  l  IQPR(K) 

21  COHTHIDE 
C 

SH0URSI1)=M 
[Rill  -IM27  ♦  IOST 
C 

QU)  =1.1 
n  51  1=1,  HAYS 

SHOURSt I  ♦  1)=SH0URSII)  ♦  IHOURSt 1P01HTU1 ) 
fll  =FR  i  SH0URS1I  ♦  11 
C 

DREPRP=FR  «  PFH  i  IP  i  MURK  1,1181 1 
KOMP--KP  i  IREPRP 

ns  =weprp  -  Bconip 

C 

DREPSP=ni  «  PFH  i  K*  l  MIM(I,ini) 

K0MP=1CP  l  IREPRP 
ADS  =K£PRP  -  BCOIW 
C 

mm\ ?  i  ip  i  smnsfMMii, j  -  mi  * » 

K»m=BCP  i  1REPRH 
All  =WEPRH  -  ICOffll 

C 

3REPRMR  i  DP  i  SHOURSt HRXttl, I  -  Will  t  1) 

DCflHHCP  i  1REPRM 
AD!  =DSEPR11  -  DCfflOH 
C 

APRI  =A1$  ♦  ADS  ♦  ADI  +  All 
AflROPT=BHflXltOLl,AI-BPRI ) 

OLD  =ARROPT 
AP»TS=AAROPT  +  .5 
PHOURSm=PHOURm  ♦  SHOURSt  I  ♦  1) 

KAAHK 1  )=IERHM(  I )  ♦  HD 
DPtPECI)  =BPIPEC  1 1  ♦  AJS 
DPIPE(I)  *DPlP£tI)  ♦  A1S 
IPflRTSt I )=!PflRTSl I )  ♦  ADI 
DPARTSUI=!PARTS(n  ♦  ADI 
REIWTt!;=REgMmi)  ♦  ABRUPT 
IFIHPARTS  .11.  IIL1G0  TO  51 
NBUY  =IMRTS-1IL 
TPARTS(I)=TPARTSm  ♦  HIUY 
TUALX(I)=TVHLUEm  ♦  IttUY  *  COST 
51  COHTIHUE 

AAROPT=AAROPT  ♦  .5 
RETURN 

91  DO  95  1=1,14 
X(I)=I.I 
95  CONTINUE 

HBROPT=l.l 
RETURH 
EKl 
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c  '  ’ESOPT’  PEBCETIIC  REQUIREMENT  FUNCTION. 

C 

C - - - - 

FUNCTION  PESOPTt IfflYS, B TOP.HNTHBP 1 
C 

DIMENSION  XI 14) 

C 


LOQICflL  HOP 


C 


COMMON 

CODON 

i 

l 

COMMON 

■ 


/ILOCXfl/  IlfHBMt  3, 36 ) ,  IPFH191 288 ) , IfJlWCl  288 ) 

/fcOCXl/  IYR, JYR,  TFH, PFH,  IHOURSt  36 ) , fiB,  RIS ,  RIS, RBI f  RH , 
RPRl ,  1REPRP ,  KOMP , 1REPRN,  BCONDN,  DREPRP ,  8C0MP , 

IREPRH,iCONDM  _ 

/HOCXO  MSM(4),COST,IRLT,IPIT,IOST13P.BP,!CPIDCP,(!MBCP) 
ONICP,FR,URCOST,  IKT.IDRT ,  IIL,  IILS,  IILU,11L0, 


i  omdcp,fr,urcost,isrt,iirt,iil.iils,iilu,iilo, 

i  MEUUflR(10),iqPR(20«) 

COMMON  -'DLOCXJV  LSTFSCI25l),LSTHlSIMI),LSmCl5),HBXREn78,2l), 
i  IFS£F(5l,2D),XlMfT,XCOUHT,LCOlRrr,HCOMT, 

i  MUNNIS,  IRJMFSC,  IMIBLC,  JKOUHT 156),  LXOUMT 1 78 ) 

C 

EQUIUflLEHC£(XU),fll) 

C 

PFH  =8.8 
BO  18  K=l, MUNNIS 

II  PFH  =PFH  ♦  IPFHIY(LSTMISIX))  *  10MU) 

IFIIWYS  .EQ.  8)GO  TO  98 

ihitop  .m.  uplt  .iE.  mmneo  jo  n 
n  =fr  i  pfh 

HD  =D1  <  IDfiTS 

IRII  =IIRT  ♦  IOST 

c 

BREPRP=I1  «  BP  l  RNIHBi  IIRYS,  I1RT ) 

KOMBP=ICP  *  MOT 
OSS  =IREPRP  -  KflNDP 
C 

DREPRP=BI  l  DP  *  DHIMN  IDfiYS, Ifilll 
ICONIP=KP  i  MOT 
fiDS  =KEPRP  -  KOMH> 

C 

BREPRM=II  *  IP  *  flWXOHjIHWS  -  IIRT) 

KOMN=ICP  *  MOT 
RBI  =BOT  -  KOQH 

C 

BREPRM=81 1  DP  *  RNflX8(8,IWYS  -  Iflll) 

DCONIN=ICP  i  IREPRM 
R1I  ^IREPRM  -  DCOW 
C 

RPRI  =RIS  +  RBS  ♦  fill  ♦  All 
PESOPT=flNRXlll.l,RI-RPRI)  ♦  .5 
RETURN 

91  DO  95  1=1,14 

xm=M 

95  CONTINUE 
PESOPT=8.8 
PETURN 
FNI 
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C  'STQfiW  INITIALIZES  DICTIONARIES. 

C 

C - 

c 

SUIKOUTINE  STORTUtll,  12, 13,  WORK, LENGTH, IFREE) 

C 

INTEGER*  12(LEHCTH),I3( LENGTH) 

C 

10  11  M,  LENGTH 
12(1)  =1  ♦  1 
13(1)  =1 

it  continue 

IEILEHCTHM 
IFREE  -1 
RETURN 
EHI 

G  *  I8T0RE’  STORES  DM  ITEM  IN  TflKI  11 

C - 

SUDROUTIIC  ISTORE(«,ITEN,  11, 12, 13,  WORDS, LENGTH, IFREE) 

C 

INTEGER*  1TEH(IH0RK),IIIIH0R1S,  LENGTH)  ,I2( LENGTH ),I3( LENGTH) 

IF (IFREE  .EQ.  IIRETURN  1 
N  15  l=l,IHORK 
15  ll(If IFKEEI=ITEfl(l) 

I  HASH  =1H1SI  HOK  ITEN(  1 ) , LENGTH) )  4  1 

NEXT  :12( IFREE) 

121 IFREE  )=I31 1HRSH) 

I3(  IHRSH  MFREE 
IFRE  =NEXT 

RETURN 
Effl 

C  MFETCH*  FINK  AN  ITEM  IN  TAKE  II  AN1  PUTS  ITS  IIOEX  IN  ’INDEX’ 


SUKOUTIIC  IFETCHI  *,  ITEM,  11,12,13, IHORIS'UIICTH,  INDEX) 

C 

INTEGER*  ITEH(IU0RBS),I1( IU0lllSTL£RGT14Tf I2(LEMCTH)tI3(LEMCTH) 
C 

IHRSH  =IHK(n01lITEH( II, LENGTH))  ♦  1 

INDEX  =131 IHRSH) 

21  IF( INDEX  .EQ.  IIRETURN  1 
DO  25  1=1, WORDS 

IFdlll, INDEX)  .HE.  ITENIDIGO  TO  31 
25  CONTINUE 
RETURN 

31  INDEX  =12(IR1EX) 

GO  TO  21 
END 


end  of  file  *  request  executed  89  tiaes 
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IV.  MUNITIONS  MODEL 

A.  Introduction 

This  section  of  the  final  report  summarizes  development  of  a  Navy 
threat-oriented,  air-to-air  missile  (AAM)  prototype  sustainability  model.  The 
munitions  capability  assessment  model  was  developed  according  to  the  following 
specifications : 

The  contractor  shall  develop  a  working  computer  model  prototype 
which  relates  requirements  to  current  and  projected  inventories  on 
an  individual  munition-type  basis.  The  model  must  be  sensitive  to 
changes  in  key  variables  such  as  salvo  size,  weapon  levels, 
expenditure  rates,  and  shifts  in  scenarios.  In  addition,  the 
model  must  be  capable  of  handling  substitution  of  less  preferred 
munitions  for  preferred  munitions  when  thay  are  exhausted. 

Synergy  developed  two  types  of  these  munitions  models  tor  the  Navy.  These 

model  types  can  be  broadly  defined  as  an  R&D  analytical  and  computer 

programming  effort  in  order  for  it  to  be  operational.  The  applied  model 

focuses  on  obtaining  roughly  right  answers  as  quickly  as  possible.  The 

applied  model  would  utilize  whatever  standard  Navy  data  were  available  to 

determine  air-to-air  sustainability  issued  and  yield  immediate  answers.  It 

also  includes  application  of  expert  judgment.  In  contrast,  the  analytical 

model  was  an  unconstrained  research  approach  to  the  problem  that  would  obtain 

these  results.  It  allows  sustainability  to  be  analyzed  in  a  much  broader 

context.  The  model  is  designed  to  encourage  sensitivity  analyses  of  key 

variables  such  as  salvo  size,  weapon  loads,  and  expenditure  rates.  It  allows 

for  substitution  of  less  preferred  missiles  tor  preferred  missiles  when 

preferred  missiles  are  exhausted. 

In  this  report,  three  Air-to-Air  Missiles  (AAMs)  are  used:  the  Sparrow, 
Phoenix,  and  Sidewinder.  The  F-14  and  F-4  aircraft  are  also  used  in  this 


example. 


B.  Applied  Model 

1 .  General  Description 

The  applied  model  focuses  on  taking  standard  Navy  data  on  requirements  and 
inventories  to  mesh  them  into  a  quick  turnaround  sustainability  assessment 
model.  This  simplified  model  matches  Navy  AAM  requirements  to  RF1  inventory 
in  each  period  of  the  war. 

Two  sources  of  requirements  data  were  analyzed  in  detail.  One  source  was 
obtained  from  the  NNOR  based  on  the  Defense  Guidance  Scenario.  A  problem  with 
these  data  is  that  the  missile  requirements  are  calculated  for  the  whole  war 
effort  and  are  not  time-phased.  The  essential  problem  to  overcome  using  these 
data  is  developing  a  methodology  which  time-phases  these  requirements. 
Therefore,  an  algorithm  had  to  be  developed  which  time-phased  the  NNOR 
requirements  over  the  course  of  the  conflict.  A  second  source  of  data  was 
obtained  from  a  CNA  requirements  model,  NNTOS,  which  yielded  requirements  on  a 
weekly  basis.  This  model's  output  thus  required  one  to  match  RFZ  inventory  by 
missile  to  CNA  requirements. 

2.  Application  to  DG  Scenario 

The  number  of  missiles  required  for  the  conflict  were  obtained  from  the 
NNOR.  Two  different  confidence  levels  were  examined— the  90  percent 
confidence  level  and  the  99  percent  confidence  level.  The  missiles  were 
assumed  to  be  expended  over  the  course  of  a  war.  Two  different  war  lengths 
were  assumed — 60  days  and  180  days. 

In  order  to  time-phase  the  missile  requirements,  it  was  assumed  that 
missile  requirements  on  a  particular  week  of  the  war  were  proportionally 
related  to  the  amount  of  F-14  and  F-4  combat  flying  activity.  More  precisely, 
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it  was  assumed  that  the  proportion  of  total  missile  requirements  fired  on  a 
particular  week  were  equal  to  the  ratio  of  combat  flying  hours  scheduled  for 
that  week  over  the  total  amount  of  combat  flying  hours  scheduled  over  the 
entire  course  of  the  war. 

To  determine  the  combat  flying  hour  profile  required  a  determination  of 
which  carriers  were  deployed  to  "hot"  theaters.  Next,  it  was  necessary  to 
determine  the  number  of  F-14  and  F-4  aircraft  deployed  to  those  carriers  in  a 
"hot”  theater.  This  information  was  obtained  from  official  Navy  planning 
documents  and  CABAL. 

In  summary,  the  carrier  deployment  schedule  indicates  the  number  of 
carriers  that  would  be  engaged  on  any  day  of  the  conflict.  The  deck-load  of 
each  deployed  carrier  indicates  the  number  of  sea-based  F-14s  and  F~4s 
available  for  air-to-air  combat.  The  total  aircraft  available  for  air-to-air 
combat  also  includes  shore-based  F-14  and  F-4  aircraft.  The  total  F-14s  and 
F-4s  available  were  multiplied  by  the  number  of  flying  hours  the  Navy  expected 
each  aircraft  type  to  fly  on  any  particular  day  of  the  conflict.  The  product 
of  this  multiplication  yielded  a  flying  hour  profile  over  the  course  of  the 
war.  Graphically,  the  profile  could  be  depicted  as; 
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The  area  under  the  flying  hours  curve  represented  the  total  possible 
air-to-air  flying  hours  available  during  the  conflict.  For  each  week  of  the 
war,  the  proportion  of  total  wartime  flying  hours  accounted  for  during  that 
week  were  calculated.  For  days  35  to  42,  or  week  number  6,  this  would  have 
amounted  to  dividing  the  shaded  area  into  the  total  area  under  the  following 
curve. 


It  was  then  assumed  that  missile  expenditures  would  occur  in  direct 
proportion  to  the  flying  hour  schedule.  Thus,  if  fifteen  percent  of  the  total 
flying  hours  occurred  in  week  number  6,  then  it  was  assumed  that  fifteen 
percent  of  the  total  missile  requirements  would  also  be  fired  or  consumed  in 
week  number  6.  This  proportionality  assumption  was  applied  to  all  three 
missile  types  and  allowed  for  the  calculation  of  the  following  graphs  for  both 
the  60-day  and  180-day  scenario. 


CASE  1 


60 


f 


Missiles 


Phoenix 


Sidewinder 


Sparrow 


180 


CASE  11 


Once  the  supplies  available  at  the  start  of  the  war  and  the  amount  of 
missiles  per  week,  required  over  the  course  of  the  war  are  estimated,  supplies 
are  compared  to  requirements  in  each  week.  At  the  end  of  the  week,  missile 
expenditures  are  subtracted  from  the  missile  inventory.  This  calculation 
determines  whether  the  conflict  is  sustained  for  that  week  for  a  particular 
missile  type  and  also  enables  calculation  of  missiles  ready-for-issue  in  the 
next  week  of  the  conflict. 

For  each  missile  type,  the  following  sustainability  display  can  be 
constructed: 


Missiles 


16 


FY85  missiles  ready-tor-issue  Inventories  were  calculated  by  subtracting 
training  consumption  and  the  pipeline  fill  requirements  from  the  sum  of  the 
on-hand  amount  plus  those  that  would  be  delivered  by  FY85 .  Such  an  analysis 
was  done  for  an  assumed  FY85  war. 

3.  Application  to  NNTOS  Scenario 

The  same  logic  was  applied  to  the  NNTOS  scenario  as  was  to  the  DG 
scenario.  However,  the  NNTOS  scenario  did  not  require  time-phasing  logic,  as 
CNA  analysts  provided  their  estimates  of  missile  requirements  on  a  weekly 
basis  throughout  the  conflict.  The  same  sustainability  display  was  developed 


for  this  scenario 


C.  Analytical  Model 


This  section  describes  the  analytical  model  which  would  be  used  to 
calculate  munitions  capability.  In  includes  conceptual  framework  and  a  plan 
for  a  prototype  automated  version. 

The  conceptual  framework  begins  with  a  number  of  simplifying  assumptions 
in  order  to  focus  on  the  model's  logic. 

The  simplifying  assumptions  are: 

1 .  One  aircraft  type 

2.  One  AAM 

3.  One  theater 

4.  One  target  type 

5.  One  carrier 

6.  No  resupply,  no  procurement,  etc. 

In  effect,  this  assumes  one  carrier  flying  one  fighter  type  armed  with  one 
missile  type.  These  simplifying  assumptions  are  made  here  for  explanation 
purposes.  They  are  not  restrictive  and  the  model  could  be  expanded  to  include 
n  items  along  any  of  the  above  dimensions. 

The  model  can  be  run  or  entered  from  two  levels:  (l)  by  directly 
specifying  missile  requirements,  or  (2)  by  specifying  a  sortie  and/or  target 
profile  and  generating  missile  requirements.  Level  one  of  the  model  would  be 
roughly  analogous  to  the  applied  model  presented  in  Section  III  below.  In 
this  analysis,  we  concentrate  on  the  second  level  where  missile  requirements 
are  generated  from  sortie  and  target  profiles. 
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1 .  Inputted  Variables  on  the  Requirements  Side 

To  develop  a  sustainability  model,  the  specific  variables  must  be 
inputted.  These  variables  describe  the  sortie  profile,  battle  parameters,  and 
the  relationship  between  sortie  and  target  profiles.  They  are  exogenous  to 
the  model. 

The  Sortie  Profile  consists  of: 

*  The  number  of  aircraft  at  the  beginning  of  the  war. 

*  Either  the  average  sortie  rate  per  aircraft  over  time  or 
the  number  of  aircraft  scheduled  to  fly  missions  and  the 
average  number  of  cycles  the  scheduled  aircraft  fly. 

These  variables  would  be  used  in  generating  the  following  curve  (assuming  no 
sortie  attrition) : 


Sorties 


The  Battle  Parameters  are: 

*  Target  intercept  rates  —  what  proportion  of  the  targets 
will  be  intercepted. 

*  Sortie  engagement  rates  --  what  proportion  of  the  sorties 
will  be  engaged  in  battle. 

*  PK  rates,  salvo  size,  launch  rate,  weapon-load,  etc.  — 
variables  which  determine  the  performance  of  the  weapon 

systems . 

*  Sortie  attrition  rates,  missiles  lost  due  to  attrition, 
exchange  rates,  etc.  --  variables  which  determine  the 
number  of  aircraft  and  misBiles  which  will  be  lost  in  an 
air-to-air  war  (AAW) . 


The  target  profile  —  the  distribution  of  targets  over  the 
course  of  the  war. 


These  battle  parameters  enable  calculation  of  the  number  of  missiles  that  will 
be  demanded  in  order  to  eliminate  all  targets  or  some  proportion  of  them. 
Alternatively,  these  battle  parameters  would  allow  estimation  of  the  number  of 
targets  that  would  be  eliminated  given  a  particular  level  of  missile 
expenditures. 

The  Relationship  Between  Sortie  and  Target  Profiles: 

The  target  and  sortie  profiles  are  either  implicitly  or  explicitly  linked 
together.  For  example,  more  sorties  are  expected  during  thos  times  the 
carrier  group  is  under  attack.  Likewise,  increased  sortie  activity  is 
expected  when  bomber  escort-strike  missions  are  scheduled.  In  both  cases,  the 
sortie  schedule  would  be  positively  related  to  the  likelihood  of  increased 
target  presentation. 

This  estimation  process  could  start  with  a  target  profile  and  not  do  a 
sortie  profile.  For  example,  the  number  of  missiles  required  to  eliminate  a 
given  number  of  targets  (or  some  proportion  of  the  targets)  from  the  battle 
parameter  variables  is  determined.  The  total  number  of  sorties  required  to 
achieve  our  target-kill  goals  could  also  be  determined.  One  could  even  back 
further  and  determine  which  combinations  of  aircraft  and  sortie  rates  would 
be  necessary  to  meet  the  goal  of  flying  the  number  of  sorties  scheduled. 
Obviously,  constraints  on  the  sortie  rate  and  aircraft  force  structure  set  an 
upper  bound  on  the  sortie  profile. 

2.  Developing  Missile  Requirements 

Sorties  flown  from  carriers  are  launched  in  cycles.  Aircraft  could  be 


seen  as  flying  their  sorties  on  an  on-off  schedule.  They  fly  a  sortie,  return 


to  the  ship,  and,  if  necessary,  fly  another  sortie.  In  this  case  the  sortie 
rate  for  a  particular  aircraft  couid  be  nothing  more  than  the  number  of  cycles 
that  it  is  scheduled  to  fly.  For  simplification  it  is  assumed  that  one-half 
of  the  aircraft  are  scheduled  for  battles  in  odd  cycles  and  the  other  half  in 
even  cycles. 

The  first  task  of  the  day  on  the  carrier  is  to  ready  the  aircraft 
scheduled  to  fly  the  first  cycle.  In  terms  of  munitions,  this  means  to  arm 
them  with  missiles.  After  the  first  cycle  aircraft  depart,  the  second  cycle 
aircraft  are  armed.  Under  the  half-odd/half-even  simplifying  assumption,  this 
means  that  a  component  of  the  missile  requirement  will  be  to  calculate  the 
number  of  missiles  necessary  to  arm  the  scheduled  aircraft. 

If  the  carrier  only  planned  to  fly  two  cycles  of  fighters,  this  would 
constitute  the  missile  requirements  for  that  day  of  the  war.  All  of  the 
sorties  scheduled  for  the  day  have  been  armed.  However,  if  more  than  two 
cycles  have  been  scheduled,  additional  missile  requirements  may  be  necessary. 
It  is  assumed  that  this  is  the  case  in  this  example. 

After  the  second  cycle  aircraft  depart,  the  carrier  will  begin  to  retrieve 
the  first  cycle  aircraft.  The  crew  of  the  carrier  will  begin  immediately  to 
prepare  them  for  departure  on  the  third  cycle.  To  prepare  them  affects 
munitions  in  two  ways. 

Aircraft  will  return  to  the  carrier  without  a  full  weapon  load, 
representing  missiles  expended  on  their  first  cycle  mission. 

These  " expend! tures"  must  be  replenished  in  order  to  arm  the 
aircraft  for  their  next  cycle  sorties. 

Aircraft  will  be  attrited.  This  means  that  a  replacement 
aircraft,  if  one  is  available,  must  be  armed.  Initially,  we  will 
assume  that  a  replacement  aircraft  is  available.  The  replacement 
aircraft,  of  course,  must  be  armed. 


Thus,  the  missile  requirements  per  day  will  be  made  up  o£  two  components: 
those  missiles  required  to  arm  all  aircraft  before  their  first  missions  of  the 
day  and  those  missiles  required  to  replenish  aircraft  to  fight  additional 
sorties,  including  arming  an  aircraft  that  has  replaced  an  attrited  aircraft. 
Graphically,  this  could  be  displayed: 


«  Number  of  missiles  required  to  replenish  sorties. 


■  Number  of  missiles  required  to  fully  arm  sorties 
for  the  first  scheduled  sorties. 

3.  Missile  Usage 

Following  the  logic  of  the  previous  section,  missile  usage  can  be  divided 
into  two  categories:  (1)  Those  expended  in  earlier  (all  but  the  last  of  the 
day)  sorties  and  those  expended  on  an  aircraft's  last  sortie  of  the  day.  The 
number  of  missiles  required  to  be  replenished  will  be  equal  to  the  number  of 
missiles  expended  on  earlier  sorties.  Missiles  expended  on  the  last  sortie  of 
the  day  will  not  be  replenished  and  will  not  be  added  to  the  daily 
requirements,  as  adding  them  to  missile  requirements  would  result  in  double 


counting.  However,  they  must  be  accounted  for  because  they  must  be  subtracted 
from  the  carrier's  inventory. 

Missiles  will  also  be  classified  into  two  other  subcategories: 

*  those  fired  at  enemy  targets; 

°  those  lost  and  not  fired  at  a  target 

This  includes  sortie  attrition,  missile  "pickles,"  training  fires, 
double-fires  (at  the  same  target) ,  etc.  This  second  classification  is 
necessary  to  compute  performance  in  terms  of  targets  killed. 

4.  Inputted  Variables  on  the  Supply  Side 

The  carrier's  initial  ready- for-issue  (RFI)  supplies  are  inputted  into  the 
model.  Included  in  these  supplies  would  be  missiles  held  on  adjacent 
munitions  supply  ships  (AEs) .  The  model  does  not  distinguish  between  supplies 
on  a  carrier  or  an  AE.  After  each  day  of  the  scenario,  the  number  of  missiles 
used  is  subtracted  from  the  "beginning  of  the  time  period  RFI."  The  resultant 
figure  becomes  the  beginning  of  the  next  period's  RFI.  The  effects  of 
resupply  are  discussed  in  more  detail  later  in  this  paper. 

5.  Sustainability 

Sustainability  analysis  can  be  performed  in  three  areas: 

*  1.  ability  to  sustain  the  sortie  profile; 

*  2.  missile  sustainability;  and 

*  3.  ability  to  eliminate  targets. 
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These  displays  could  look  like  the  following:  (Assume  sustainability 


fails  on  day  t.) 


Number 

of 

Sorties 


Sortie  Req. 


T\ 


\ 


\ 


\ 


\ 


\ 


Sortie  Cap. 


Days  of  Conflict 


Another  way  to  track  sustainability  would  be  in  terms  of  missiles.  The 
total  number  of  missiles  required  to  fly  all  sorties  scneduled  could  be 
tracked.  This  is  shown  on  the  following  chart.  Another  way  to  track  missile 
sustainability  is  by  missile  type  to  generate  separate  curves  or  a  "stacked" 


missile  sustainability  curve. 


Number 

of 

Missiles 
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Finally  "sustainability”  could  be  evaluated  in  terms  of  the  number  of 
targets  killed  or  percent  of  threat  killed.  Whether  this  is  called 
sustainability  or  performance  is  relatively  unimportant.  Because  the  ultimate 
goal  of  the  air  war  is  the  elimination  of  threat,  the  analysis  gains 
significantly  if  such  a  tie-in  is  allowed. 

Once  battle-field  parameters  have  been  entered,  the  number  of  missiles 
fired  at  enemy  targets  is  known,  the  expected  number  of  targets  that  would  be 
that  would  be  eliminated  can  be  calculated. 

The  following  output  display  could  be  presented: 


Number 

of 

Targets 


Targets  engaged 


Targets  expected  to  be 
killed  if  all  sortie 
requirements  are 
met. 


t 


Days  of  Conflict 


At  time  t,  the  sortie  capability  fails  to  meet  the  sortie  requirements. 
The  immediate  effect  of  this  shortfall  is  a  reduction  in  the  target 


elimination  rate. 


.  Prototype  Automated  Model 


1 .  Characteristics 


The  prototype  model  focuses  on  three  aircraft,  the  F-14s,  F-4s,  and  F-18s 
carrying  AAMs.  Three  AAMs  are  considered  —  Phoenix,  Sparrow,  and  Sidewinder. 
Carrier  deployment  and  air-to-air  combat  takes  place  in  three  theaters.  Each 
theater  is  treated  as  an  independent  entity.  This  allows  for  a  wartime 
scenario  which  can  occur  simultaneously  or  sequentially  in  any  or  all 
theaters.  From  a  technical  standpoint,  this  means  that  there  are  three 
sub-models  within  the  prototype,  one  for  each  theater.  The  underlying 
analysis  tor  each  theater  is  effectively  the  same.  Worldwide  analysis  simply 
means  "summing"  all  theaters. 1 

Resupply  to  a  particular  theater  can  be  from  intra-theater  supplies  or 
from  CONUS  inventories.  The  model  treats  CONUS  inventories  as  those 
inventories  not  assigned  to  a  particular  fleet.  It  is  assumed  that  the 
analyst  knows  which  fleets  are  assigned  to  which  theaters,  and  thus  can 
calculate  theater-wide  inventories. 

CONUS  supplies  are  allocated  to  "hot"  theaters  first.  If  hot  theater 
requirements  exceed  CONUS  supplies,  then  CONUS  supplies  are  allocated  to 
theaters  by  "fair  share"  or  proportionate  logic. 

There  are  two  types  of  threats  in  the  target  profile.  They  are  designated 
as  type  Tj  and  T2  targets.  Tj  targets  constitute  threats  against  a 
battle  convoy.  T2  targets  constitute  threats  against  friendly  bombers.  In 


1  An  expanded  model  could  be  developed  that  allows  for  a  further 
disaggregation.  That  is,  the  model  could  consider  each  carrier  and  land  base 
as  a  unique  entity.  This  would  represent  the  more  detailed  level  of  analysis. 
The  analysts  could  group  these  carriers  and  land  bases  into  a  number  of  ways, 
each  grouping  effectively  being  a  theater.  In  the  prototype,  we  ignore  land 
bases  are  ignored,  only  three  theater  groupings  are  used. 


each  ca&e,  F-4s,  F-14s,  and  F-18s  are  required  to  eliminate  the  targets  or 
some  proportion  of  the  targets.  The  number  of  target  types  could  be  expanded. 

The  model  allows  for  weapon  load  or  load  out  substitution.  Each  aircraft 
is  inputted  with  a  particular  load  out.  This  constitutes  a  vector  of  the 
three  missile  types.  As  long  as  supplies  permit  planes  to  be  fully  loaded 
out,  aircraft  are  permitted  to  fly.  However,  if  a  full  weapon  load  of  optimal 
mix  is  not  obtainable,  a  substitute  weapon  load  is  permitted  as  an  option  of 
the  model. 

As  in  the  analytic  model,  analysis  can  be  done  at  three  levels:  sortie 
sustainability,  missile  sustainability  and  target  performance. 

Finally,  the  length  of  the  war  can  be  varied. 

2.  The  Current  Force  Structure  Matrix  (CFSM) 

The  essence  of  the  prototype  model  is  keeping  track  of: 

a.  Aircraft  on  each  carrier, 

b.  Munitions  available  to  each  carrier,  and 

c.  Munitions  available  in  the  U.S.  or  distant  depots.  The  matrix 

on  the  next  page  illustrates  the  data  required. 

Each  carrier's  inventory  of  missiles  along  with  its  supply  ships,  would 
be  considered  ready- f or-issue. '  Along  with  the  carrier's  munitions  supply, 
we  would  track  information  on  the  ship's  deck  load  in  terms  of  the  number  of 
F-4s,  F-I8s,  and  F-14s  it  contains  and  the  fleet  to  which  the  carrier  is 
assigned. 

1  For  the  prototype,  it  could  simply  oe  assumed  that  all  carriers  "look" 
alike  in  terms  of  RFI  missiles  and  deck  load.  Or  alternatively,  it  could  be 
assumed  that  all  carriers  can  be  grouped  into  two,  three,  or  four  groups. 

Each  carrier  within  a  particular  group  can  be  assumed  to  be  like  all  other 
carriers  in  that  group. 
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Tbs  bottom  half  of  the  matrix  includes  missiles  that  are  not-ready- 
for-iasue.  These  supplies  can  be  considered  part  of  the  pipeline.  These 
supplies  include  those  controlled  fleetwide  as  well  as  CONUS  supplies.  CONUS 
is  defined  in  the  prototype  as  controlling  supplies  not  assigned  to  a  fleet. 
Aircraft  will  not  be  tracked  at  land  bases  in  the  prototype.  Conceptually, 
however,  land  bases  could  be  considered  in  the  model  as  carriers. 

The  CFSM  will  be  tracked  on  a  year-to-year  basis.  If  no  war  is 
encountered  in  a  year,  the  initial  matrix  will  be  adjusted  to  reflect 
peacetime  missile  consumption  and  new  physical  procurements.  Changes  in  deck 
loads  such  as  replacement  of  an  aircraft,  will  be  reflected  in  the  relevant 
year. 

Once  a  war  scenario  is  begun,  the  matrix  will  be  calculated  on  a 
week-by-week  basis  or  whatever  time  period  is  chosen.  Additional  information 
will  be  required,  the  most  important  of  which  will  be  the  theater  location  of 
a  particular  carrier.  Conceptually,  this  means  that  during  a  war  year,  the 
CFSM  will  add  extra  columns,  each  additional  column  representing  a  theater. 

Like  the  fleet  variable,  those  carriers  in  a  particular  theater  are 
expected  to  have  a  value  of  t  under  the  appropriate  column.  This  is  shown  on 
the  expanded  CFSM  on  the  next  page.  Missile  and  sortie  capabilities  for  a 
particular  theater  are  determined  by  aggregating  over  all  the  carriers 
deployed  to  that  particular  theater.  It  is  possible  that  a  carrier  is  in 
transition  from  one  theater  to  another  or  not  engaged  in  any  theater.  In  such 
a  case,  it  is  denoted  that  the  carrier  is  not  deployed  in  any  theater.  This 
would  include  carriers  drydocked  for  repair,  etc.  In  the  expanded  CFSM,  a 
carrier  not  deployed  to  any  theater  would  have  zero  values  in  all  the  theater 
columns.  Carrier  #7  on  the  expanded  CFSM  chart  is  an  example. 


EXPANDED  CURRENT  FORCE  STRUCTURE  MATRIX  (CFS“I) 

FYXX 

Vhrtime  Scenario 

Theater 

Status  Missiles _ _ Deck  Loads _  Fleet  Assignment  Assignment 

Ready  for  Issue  1  SP J  PH  )  si  Fl  F-4  I  F-14  f~F-18Tl  PAClLANT  I  EUrTItTI  T2"I  't3 
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As  stated  earlier,  the  CFSM  during  the  wartime  scenario  will  change  on  a 
week- by- week  basis.  Initially,  on  D-day,  the  matrix  will  be  frozen  for  the 
year  in  which  D-day  occurs.  As  the  war  proceeds,  the  matrix  will  change  to 
reflect  missiles  fired,  attrited,  etc. ,  and  also  to  reflect  changes  in  carrier 
deployments. 

Additionally,  a  mathematical  algorithm  is  required  to  reflect  fleetwide 
and  CONUS  inventories  advancing  to  the  ready-for-issue  status.  This  simply 
means  developing  j  pipeline  equation  which  lags  the  transfer  of  inventory  from 
the  fleet  depots  or  the  CONUS  depot  to  a  particular  carrier.  The  model  can 
accomodate  both  "hot  theater"  and  "fair  share"  logic. 

Hot  theater  means  that  any  carrier  or  group  of  carriers  involved  in  combat 
has  first  crack  at  supplies  from  its  fleet  or  CONUS.  Fair-share  means  that  in 
a  case  where  inventory  supplies  are  insufficient  to  satisfy  every  carrier's  or 
fleet's  demands,  the  supplies  are  proportionally  shared  among  the  users  in 
accordance  with  their  requirements. 

3.  Variables  Requiring  Inputting 

In  order  for  the  prototype  to  have  the  capability  to  allow  Navy  analysts 
to  build  their  own  scenario,  the  following  variables  or  variable  distributions 
must  be  inputted  for  each  theater. 

a.  Carrier  Deployment  Schedule 

It  also  assumes  that  each  individual  carrier  can  be  tracked  to  a 
particular  theater  on  a  particular  day,  unless  it  is  assumed 
Initially  that  all  carriers  are  alike. 
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Number  of 
Carriers 


Days  of  Conflict 


b.  Aircraft  Deployment 

Using  the  carrier  deployment  schedule,  the  aircraft  force 

structure  can  be  determined  on  a  theater  basis  over  the  course  of 

the  war.  These  distributions  represent  the  maximum  number  of 

aircraft  available  to  each  theater.  Over  the  course  of  the  war, 

it  would  probably  be  adjusted  downward  to  reflect  attrition. 

Number  of  Number  of  Number  of 

Aircraft  Aircraft  Aircraft 


Days  of  Conflict  Days  of  Conflict  Days  of  Conflict 

Theatre  1  Theatre  2  Theatre  3 


4 .  Calculating  Requirements 

Both  the  sortie-generation  approach  and  the  target  profile  approach  can  be 
used  to  calculate  requirements. 

a.  Sortie-Generator  Approach 

A  sortie  profile  could  be  generated  by  inputting  a  sortie  rate  for 
each  theater  on  each  day  of  the  war.  The  number  of  aircraft 
scheduled  to  fly  missions  each  day  and  their  "cycle”  sequence 


could  be  translated  into  the  sortie  rate. 


to 


The  type  of  mission  and  the  number  of  sorties  to  be  flown  could 


Number  of 

'  s _ 


also  be  specified.  That  is,  a  distribution  of  sorties  could  be 
specified  to  be  flown  against  type  1  targets  and  type  2  targets. 
This  approach  would  yield  the  following  distributions: 

Number  of 


-12 


Number  of 
Sorties 


Theatre  1 


Theatre  2 


Theatre  3 


These  distributions  could  be  used  to  determine  how  many  aircraft 
would  be  armed,  how  many  would  be  required  to  be  replenished,  etc. 
It  would  involve  taking  this  distribution  and  reapplying  the  logic 
developed  in  the  prevlsou  section, 
b.  Target-Profile  Approach 

A  second  approach  would  be  to  input  in  each  theater  the  target 
profile  expected  for  that  day  of  the  war.  Also  inputted  would  be 
battle  parameters  such  as  PKs,  intercept  rates,  engagement  rates, 
exchange  ratios,  etc.  From  those  parameters,  the  number  of 
sorties  required  to  eliminate  that  day's  engaged  targets  (or  some 
specified  proportion  of  those  targets)  would  be  inputted.  For 
each  theater,  the  number  of  sorties  required  to  meet  the  target 
kill  goals  could  be  generated.  A  sortie  profile  generated  above 
the  maximum  sorties  that  can  be  flown  implies  a  force-structure 
constraint. 
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In  summary,  for  the  target  profile  approach  the  number  and  timing  of 
targets  or  threats  expected  to  occur  are  entered  for  each  theater.  Given  a  set 
of  battle  parameters,  the  number  of  sorties  required  to  achieve  the  target 
kill  rate  can  be  generated. 


5.  Calculating  Missiles  Used 

Whether  the  sortie-generator  approach  or  the  target-profile  approach  is 
used,  the  same  logic  that  was  developed  in  the  analytical  model  is  contained 
in  prototype  in  terms  of  missiles  used.  In  each  period,  calculations  are  done 


a.  Missiles  fired  at  targets;  and 

Missiles  lost  due  to  attrition  of  aircrait,  ships, 

b.  duplicate  fires,  etc. 


6.  Sustainability  Analysis 


Each  day  the  number  of  missiles  required  to  fly  the  day's  sorties  is 
determined.  If  the  number  of  missiles  are  available  to  meet  those 
requirements,  the  conflict  is  sustained  through  that  day. 

If  the  missiles  are  not  available,  the  conflict  is  not  sustained. 

However,  it  is  possible  to  build  a  s  cond  level  consideration.  This  may  allow 
for  load-out  or  weapon  load  substitution.  For  example,  the  supply  of 
sidewinders  may  run  out.  Aircraft  may  be  allowed  to  substitute  sidewinders 
with  other  missile  types.  Missile  substitution  would  enable  the  conflict  to 
be  sustained  for  a  longer  time  period. 

The  same  sustainability  curves  with  respect  to  sorties  and  missiles 
developed  in  Section  II  can  be  generated  for  the  prototype.  However,  they 
could  also  be  generated  for  each  theater  as  well  as  be  disaggregated  by 


missile  types.  Worldwide  analysis  can  be  performed  by  summing  over  all 
theaters.  Lastly,  a  detailed  target  performance  profile  could  be  generated 
for  each  theater. 

Displays  for  the  following  sustainability  analyses  could  be  generated  by 
the  prototype  for  each  theater  and,  or  course,  for  all  theaters  summed  up: 

a.  Sorties,  including  a  separate  analysis  for  F-14  sorties, 

F-1 4  sorties  and  F-18  sorties; 

b.  Missiles,  including  a  separate  analysis  for  Sparrows, 

Phoenixes,  and  Sidewinders;  and 

c.  Target  kill  performance  profile,  for  Tj ,  the  T2  threat 
type. 

At  the  end  of  each  time  period,  after  the  sustainability  analysis  and 
targets  killed  performance  analysis  have  been  conducted,  the  CFSM  is  adjusted. 
The  primary  adjustment  is  to  reduce  all  carrier  missile  loads  by  the  number 
expended,  including  those  lost  due  to  attrition,  etc.  In  addition,  new 
supplies  of  missiles  from  the  fleet  depot  have  to  be  added  to  the  appropriate 
carriers,  and,  of  course,  deducted  from  the  appropriate  supply  depot. 

Finally,  changes  in  carrier  deployments  from  one  theater  to  another,  or  from 
"transit"  to  a  theater,  must  be  made  to  the  CFSM.  After  all  these  adjustments 
are  made,  the  resultant  matrix  is  the  CFSM  for  the  next  period  of  the  war. 

7.  Additional  Options  in  the  Prototype 
a.  Sortie  Attrition 

The  number  of  aircraft  that  will  be  lost  in  a  particular  day  can 
be  estimated.  This  requires  the  inputting  of  an  exchange  ratio  of 
some  sorts.  These  aircraft  can  be  deducted  from  the  appropriate 
carrier '8  deck  load.  This  may  require  the  remaining  planes  to  fly 
at  a  higher  sortie  rate  in  order  to  maintain  a  required  sortie 
profile.  This  may  be  a  theaterwide  problem  and  not  necessarily 


specific  to  a  particular  carrier.  That  is,  attrited  sorties  will 


require  aircraft  on  all  carriers  in  a  particular  theater  to  be 
used  more  intensively.  Of  course,  aircraft  attrition  could  lead  to 
a  force  structure  problem  which  means  that  there  are  not 
sufficient  aircraft  to  meet  the  requirements. 

Lastly,  a  resupply  of  aircraft  logic  could  be  built  into  the 
model.  As  a  carrier's  aircraft  are  depleted,  new  fighters  are 
dispatched  from  fleet  inventories,  if  such  "supplies"  actually 
exist. 

b.  Float  Attrition 

The  CFSM  allocates  all  float  inventory  to  a  particular  carrier. 

It  is  important  to  keep  in  mind  that  these  inventories  represent 
both  the  carrier*  s  on-deck  inventories  and  these  inventories  on 
adjacent  AEs.  It  is  assumed  that  all  AE  supplies  can 
instantaneously  be  loaded  onto  the  carrier.1  A  float  attrition 
factor  could  be  added  that  effectively  reduces  AE  supplies  due  to 
AE  attrition.  Such  a  factor  could  be  tied  to  target  kill 
performance  of  Tj  threats.  The  worse  that  the  Tj  kill 
performance  is,  the  greater  is  the  loss  of  AE  inventories  due  to 
attrition.  Such  logic  can  also  be  expanded  to  carrier  attrition. 


1  It  is  also  assumed  that  an  AE's  supplies  can  be  loaded  onto  any  carrier 
within  the  same  theater.  This  assumption  is  implicit  in  the  "aggregation 
logic"  when  theater  supplies  are  obtained  by  summing  the  supplies  of  all 
deployed  carriers  to  that  theater. 
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c.  Float  Inventory  Requirements 

The  model  could  be  constrained  so  that  a  requirement  is  built  into 
it  that  carrier  and  AE  inventories  never  fall  below  a  specified 
amount.  The  amount  represents  the  minimum  level  required  for  the 
carrier  to  defend  itself  against  an  attach.  Such  logic  would  be 
tied  into  the  resupply  module  of  the  prototype.  This  would 
effectively  mean  that  pipeline  movements  of  missiles  are  allocated 
first  to  ships  below  a  "safety  net"  figure;  then  to  "hot 
theaters" ,  and  finally  on  the  basis  of  "fair  share." 


V.  FUTURE  DIRECTIONS 


A.  Introduction 

The  methodology  that  is  described  in  this  report  is  an  excellent  basis  for 
continuing  capability  assessment.  This  section  describes  a  framework  for 
expanding  the  work  to  extend  its  applicability  to  different  logistics 
components,  different  aircraft,  different  Navy  offices  for  use,  and  wider 
applications  of  the  model. 

This  expansion  path  focuses  on  the  CAPLOG  Model.  It  presents  a  series  of 
model  expansions  which  include  incorporation  of  an  expanded  version  of  the 
munitions  work  presented  in  this  report.  In  addition,  expansion  of  this 
capability  assessment  modeling  would  be  greatly  enhanced  by  a  comprehensive 
Navy  logistics  capability  and  requirements  model.  This  section  describes  such 
a  capability  overview  system  and  tnen  lists  refinements  to  the  CAPLOG  Model, 
including  incorporation  of  munitions. 

B.  Navy  Capability  Overview  System 

Step  1  -  Design  a  Navy  Logistics  Capability  and  Requirements  Oversight 
Module  as  Part  of  the  CAPLOG  System 

Develop  a  manual  prototype  information  acquisition  and  integration  system 
for  OP-964  and  for  NAVSUP  to  collect  logistics  capability  information  system 
on  all  aspects  of  NAVAIR  and  build  preliminary  working  hypotheses  of  numerical 
results  based  on  expert  judgment,  existing  logistics  capabilities  for  major 
logistics  input  factors  including  reparable  spares,  munitions,  TRAP, 
maintenance  manpower,  consumable  spares  and  other  factors. 

The  system  will  have  the  flexibility  to  include  multiple  sources  of 
information  within  the  Navy  ranging  from  information  on  specific  battle  groups 
to  Navy-wide  information  about  certain  logistics  inputs.  The  system  will 


focus  on  aggregate  supply  characteristics  for  individual  weapon  systems  and 
take  account  not  only  of  existing  capabilities  but  those  that  might  be 
logically  forecast  to  exist  as  a  result  of  past  and  projected  resources 
applied  to  various  problems.  This  capability  will  take  a  graphical  approach 
and  address  the  information  requirements  of  the  Materiel  Readiness  Reports  and 
the  major  warfare  roles  of  the  Navy.  Undertake  preliminary  and  exploratory 
steps  to  automate  these  capabilities  and  explore  automated  methods  of  linking 
the  individual  pieces  of  capability  information  obtained  through  this  process. 

Focus  attention  on  this  method  as  a  vehicle  of  stating  concisely  the  needs 
for  information  the  Navy  has  and  exploring  uses  of  this  tool  to  prioritize 
information  gathering  and  research  efforts. 

Step  2  -  Revise  the  Preliminary  Methodology  and  Begin  to  Implement  It  with 
Realistic  Data  and  Expand  the  Automation 

Thoroughly  revise  and  augment  all  methodology  project  concept  developed  in 
Step  1  based  on  the  preliminary  results.  In  addition,  augment  the  analysis  so 
that  it  could  be  used  not  only  for  resourcing  but  also  for  crisis  management. 
Identify  a  reasonably  wide  range  of  contingencies  and  circumstances  affecting 
logistics  capabilities.  Develop  crude  working  hypotheses  based  on  expert 
judgment,  likely  results  for  each,  focusing  on  order  of  magnitude  of  the  sizes 
of  problems  of  differnt  sizes,  using  this  methodology  to  insure  large  and 
high-priority  problems  are  addressed  first.  Lower  magnitude  problems  that  are 
critical  are  dealt  with  in  a  balanced  and  comprehensive  fashion. 

Expand  the  automation  of  preliminary  results  and  explore  automated 
linkages,  particularly  where  aggregation  of  individual  unit  or  battle  group 
results  are  required  for  fleet  commands  or  for  Navy-wide  analysis  results. 


Initial  versions  of  this  work  will  be  forced  to  be  completely  consistent  with 
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NAVSUP  requirements  in  funding  decision  Analysis.  They  will  also  be  used  to 
analyze  operations  plans  from  a  logistics  point  of  view. 

Step  3  -  Explore  Decision  Applications  of  the  New  Approach 

Identify  two  or  three  major  policy,  doctrine,  resource  requirement,  or 
resource  priority-application  decisions  that  the  Navy  is  considering  or  that 
are  suggested  by  preliminary  analyses  in  the  modeling  approach.  Work  with 
Navy  program  offices  and  with  Navy  programmers  on  these  real-life  situations 
they  are  facing  and  utilize  the  conceptual  approach,  the  manual  graphics 
results  and  possibly  quick -response  automated  products  to  test  the  methodology 
and  see  whether  assistance  can  truly  be  offered  to  practical  situations. 

Step  4  -  Balanced  Program  Analysis 

Develop  automated  methods  to  simultaneously  show  Navy  capabilities  for 
reparable  spares,  munitions  and  POL. 

C.  CAPLOG  Expansion 

The  possibilities  for  expansion  of  the  CAPLOG  Model  are  listed  in  separate 
steps  as  follows. 

Step  1  -  Expand  Coverage  of  the  CAPLOG  Model  to  Other  TMSs 

The  data  base  development  work  that  was  done  for  the  F-14  must  be  repeated 
for  four  to  five  other  major  battle-group  aircraft.  This  expansion  will  build 
upon  the  F-14  work  and  incorporate  improvements  in  the  data  base  extraction 
procedures  resulting  from  the  F-14  data-scrub  effort.  These  additon  TMSs 
should  be  Incorporated  into  the  CAPLOG  Model,  in  the  following  priority:  A- 6 , 
S-3,  A-7;  and  P-3.  In  addition,  an  initial  survey  will  be  done  to  determine 
if  adequate  data  are  available  for  the  F/A  18.  If  data  are  available  for  this 
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weapon  system,  it  will  be  added  to  the  data  base  between  the  S-3  and  the  A-7. 
As  part  of  this  task,  the  indenturing  problem  and  its  relationship  to  common 
spares  will  be  addressed. 

Step  2  -  Develop  a  Methodology  for  Including  Consumables 
Into  the  CAP LOG  System 

A  methodology  needs  to  be  developed  for  including  consumable  spares  in  the 
CAPIDG  Model.  This  will  require  investigating  indenturing  relationships 
between  consumable  and  reparable  spares.  These  data  presumably  exist  to  make 
the  linkup  in  ASO  data  systems.  Zf  these  data  are  not  available  to  allow 
explicit  linkages  to  be  developed,  an  alternative  factoring  methodology  will 
be  employed  to  develop  a  feasible  alternative  approach  for  including 
consumables.  All  data  bases  or  algorithms  used  in  the  approach  will  be 
documented. 

Step  3  -  AVCAL  Analyses  Using  the  CAPLOG  Model 

Using  the  P-14  CAPLOG  prototype,  specific  analyses  will  be  developed  for 
one  AVCAL  and  capability  estimates  provided  for  one  battle  group.  Specific 
issues  to  be  addressed  include  the  likely  benefits  of  full  versus  partial 
AVCAL1 s.  In  addition,  the  work  will  provide  alternative  capability  assessment 
based  on  the  efforts  of  having  more  than  one  AVCAL  operating  together.  These 
synergistic  AVCAL  effects  have  not  yet  been  studied  in  the  necessary  detail. 
This  task  will  Include  a  listing  of  assumptions,  input  data,  and  methodology. 

Step  4  -  Continued  CAPLOG  Testing  and  Refinement 

The  existing  CAPLOG  prototype  will  be  used  to  continue  a  number  of  runs 
under  a  number  of  different  likely  scenarios  and  situations  in  the  Navy. 


Experts  from  NAVSUP,  the  operation  community,  and  other  areas  of  the  Navy 


deemed  relevant  will  be  consulted,  these  runs  will  help  to  develop  a  better 
baseline  set  of  assumptions  and  circumstances  which  then  can  be  applied  to  all 
TMSs  when  the  data  are  available. 

In  addition  to  the  testing  of  the  model,  logic  improvements  are  required. 

A  more  sophisticated  flying  program  input  module  is  required.  This  will  aloow 
changes  to  be  made  more  easily  in  the  flying  program,  and  a  more 
straightforward  interface  between  these  flying  programs  and  the  CAP LOG  Model. 
In  addition,  specific  algorithms  to  handle  cannibalization  in  the  model  will 
be  investigated  in  conjunction  with  NAVSUP  personnel  to  develop  a  more 
realistic  Navy  set  of  assumptions  for  how  to  handly  cannibalization  in  the 
CAP LOG  Model. 

Step  5  -  Use  of  the  CAP LOG  Model  to  Suggest  Required  Changes  to  the  NAMSO 
and  ASO  Data-Collection  Systems 

It  has  long  been  clear  that  some  improvements  will  be  required  in  Navy 
data-collection  systems  for  reparable  spares  if  a  true  capability-assessment 
system  is  to  be  developed.  The  CAPLOG  Model  is  an  extremely  useful  tool  for 
determining  which  data  elements  are  sensitive  and  which  require  change 
immediately.  Data  elements  will  be  identified  which  are  acceptable  but  which 
could  use  long-term  improvement.  Using  the  CAPLOG  Model  to  run  sensitivity 
runs  in  conjunction  with  detailed  work  and  interviews  with  NAMSO  and  ASO 
personnel  will  yield  a  CAPLOG  master  data  base  plan.  This  master  data  base 
plan  shall  include  a  set  of  necessary  steps  to  improved  Navy  data-collection 
system  to  support  credible  capability  assessments.  This  plan  will  include 
priorities  and  magnitudes  of  the  problem  and  recommended  solutions.  It  will 
present  options  for  time-phasing  and  the  specific  benefits  of  making  the 
improvements  and  specific  costs  of  not  making  the  improvements  in  terms  of 
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credible  capability-assessment  results.  This  plan  will  be  fully  coordinated 


with  NAMSO  and  ASO  personnel  and  with  any  ongoing  Navy  efforts  to  improve 
these  data. 

Step  6  -  Integration  of  the  CAPLOG  Spares  and  CAPLOG  Munitions  Work 

Specific  linkages  will  be  developed  to  provide  a  balanced  program 
framework  for  CAPLOG  modules.  This  will  also  show  how  consistent  operational 
activity  levels  can  be  fed  into  the  munitions  and  spares  side  to  generate 
consistent  capability  charts  for  tying  the  capabilities  of  both  resource 
areas.  This  work  will  be  done  manually  initially  with  an  automated  linkage 
program  specified. 

This  work  should  include  the  linkage  methodology  and  show  prototypical 
results  in  a  balanced  format  of  combining  real  results  in  one  set  of  charts. 

Step  7  -  Develop  Linkages  Between  the  Initial  CAPLOG  Prototype  and  ASO 
Budgeting  and  Procurement  Procedures 

A  set  of  linkages  could  be  developed  between  the  outputs  of  the  CAPLOG 
Model  and  the  current  methods  of  requirements  determination  and  procurement. 
These  linkages  will  allow  a  prototype  reconciliation  between  the  outputs  of 
the  model  and  the  official  Navy  requirements  determinations. 

As  a  result  of  this  effort,  algorithms  and  methodology  will  be  specified 
which  provide  these  linkages  and  reconciliations.  In  addition,  a  set  of 
recommendations  as  to  how  NAVSUP  and  ASO  could,  in  a  prototype  fashion, 
develop  a  more  capability-oriented  requirements-determination  process  which 
would  allow  them  to  more  explicitly  link  capability-assessment  models  such  as 
CAPLOG  to  their  processes. 


